Office中国论坛/Access中国论坛

标题: 模糊查询和for each的问题 [打印本页]

作者: cake_super 时间: 2008-7-18 11:38
标题: 模糊查询和for each的问题
请教一下，我想在这个窗体中实现如下功能

一个非邦定文本框用来输入需要查询的文本，窗体上有四个字段，我只希望这个文本框右边的search按钮只搜索No1,No2,No3这三个字段，不搜索name字段，

只要上述三个字段中有符合非文本框中的内容，就将此条记录搜索出来我不知道for each这个代码怎么写，麻烦哪位能帮我修改一下供我参考

作者: sgrshh29 时间: 2008-7-18 12:48
勉强能用：
Dim ctl As Control
For Each ctl In Me
If Left(ctl.name, 2) = "no" Then
      Me.Filter = ctl.name & "='" & Text4 & "'"
      Me.FilterOn = True
      If Me.RecordsetClone.RecordCount > 0 Then Exit Sub
End If
Next

作者: cake_super 时间: 2008-7-18 13:17
冒昧问一下 If Me.RecordsetClone.RecordCount > 0 Then Exit Sub 什么意思啊

作者: sgrshh29 时间: 2008-7-18 13:44
如果找到记录，就退出循环。

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