Office中国论坛/Access中国论坛

标题: 怎样解决自动编号的查询？ [打印本页]

作者: jks 时间: 2004-1-30 19:29
标题: 怎样解决自动编号的查询？
表1中有一自动编号字段，查询窗体中有一编号文本框，我想实现的是，在查询窗体编号文本框，输入编号，按查询按钮能够查询表1中的符合查询窗体中输入的编号的记录。请大家帮忙。

作者: zhengjialon 时间: 2004-1-30 19:34
用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编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)