用DLOOKUP函数就可以查到你想要的值了。
如果是要查找整条记录,要做一个查询,在查询的编号条件准则里写: forms!查询窗体!文本框
DLookup 函数示例
以下示例将从满足 criteria 内容记录的“公司名称”字段中返回名称信息。域为“运货商”表。criteria 参数将结果记录集限制为“运货商ID”等于 1 的记录。
Dim varX As Variant
varX = DLookup("[公司名称]", "运货商", "[运货商ID] = 1")
来自“运货商”表的下一个示例使用窗体控件“运货商ID”来为 DLookup 函数提供 criteria,注意对控件的引用不用包括在标识字符串的引号中。这样可以确保每次调用 DLookup 函数时,Microsoft Access 将从控件中获得当前值。
Dim varX As Variant
varX = DLookup("[公司名称]", "运货商", "[运货商ID] = " _
& Forms!运货商!运货商ID)
下一个示例使用一个变量 intSearch 来获取值。
Dim intSearch As Integer, varX As Variant
intSearch = 1
varX = DLookup("[公司名称]", "运货商", _
"[运货商ID] = " & intSearch)
[此贴子已经被作者于2004-1-30 11:35:22编辑过]
|