Question

如何在ACCESS中实现在窗体中的文本框中输入一个【供应商编号】，按下查询按钮，在子窗口中显示相关数据！

我想设计一个ACCESS数据库
这个数据库中有一个表（产品资料）和一个窗体（产品查询）
表的字段有三个：产品编号，产品名称，供应商编号
窗体中有一个文本框，一个按钮和一个子窗体，
如何在文本框中输入一个供应商编号，按下按钮实现在子窗体中显示对应的产品。
我是ACCESS小白，希望高手解答。谢谢！！！！
我的邮箱是： 307921745@qq.com

Answer 1

例如：
Dim stemp As String
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

Dim empno As String
If Nz(Me![供应商编号1]) <> "" Then
empno = "供应商编号 like '%" & Me![供应商编号1] & "%'"
Else
empno = "1=1"
End If
stemp = "select * from 表名 where " & empno & " order by 编号"
rs.Open stemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

Set **子窗体.Form.Recordset = rs

代码基本上就是这样

追问

我想设计一个ACCESS数据库
这个数据库中有一个表（产品资料）和一个窗体（产品查询）
表的字段有三个：产品编号，产品名称，供应商编号
窗体中有一个文本框，一个按钮和一个子窗体，
如何在文本框中输入一个供应商编号，按下按钮实现在子窗体中显示对应的产品。
我是ACCESS小白，希望高手解答。谢谢！！！！
我的邮箱是： 307921745@qq.com