查找功能代码实现

李艳飞　发表于：2016-02-04 15:19:06 　

在文本框输入“文件接受编号”后，点击“查找”能调到相对应的记录，“查找”的代码怎样写，不胜感激！

煮江品茶发表于：2016-02-04 15:26:27

在按钮的点击事件中写：
dim wh as string
wh="true"
if isnull(me.文本框名称.value)=false then
wh=wh & " and 文件接收单编号 like '*" & me.文本框名称.value & "*'"
end if
me.子窗体控件名称.form.filter=wh
me.子窗体控件名称.form.filteron=true

如果想同时查询项目名称，可写为：
dim wh as string
wh="true"
if isnull(me.文本框名称.value)=false then
wh=wh & " and 文件接收单编号 & 项目名称 like '*" & me.文本框名称.value & "*'"
end if
me.子窗体控件名称.form.filter=wh
me.子窗体控件名称.form.filteron=true

Top

李艳飞发表于：2016-02-17 15:29:31

谢谢你帮了我的大忙

Top

朱先生发表于：2016-02-18 15:05:50

还知道谢谢啊，帮了你的大忙，兴奋得把结贴的事给忘了吧

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

查找功能代码实现