Office中国论坛/Access中国论坛

标题: 在线等待请教击键同时执行模糊查询 [打印本页]

作者: rainsword 时间: 2011-6-27 11:42
标题: 在线等待请教击键同时执行模糊查询
本帖最后由 rainsword 于 2011-6-27 12:56 编辑

已经有的查询功能：窗体A ，【文本框1】输入字母或数字后，点击[查询]按钮可以执行模糊查询。想更改为【文本框1】输入字母或数字同时执行模糊查询。比如第一次键入A，模糊查询，第二次键入4，模糊查询A4，第三次键入1，模糊查询A41.....
试过方法不成功：
Private Sub 编号_KeyPress(KeyAscii As Integer)
KeyAscii = Asc(UCase(Chr(KeyAscii)))
Call cmd查询_Click
End Sub

作者: rainsword 时间: 2011-6-27 11:48
更改如下代码，只能键入一个字母或数字。
Private Sub 编号_KeyPress(KeyAscii As Integer)
  KeyAscii = Asc(UCase(Chr(KeyAscii)))
  Me.cmd查询.SetFocus
  Call cmd查询_Click
  Me.编号.SetFocus

End Sub

作者: rainsword 时间: 2011-6-27 15:09
[分享]万能实时模糊查询？？超值
http://www.office-cn.net/forum-v ... -fromuid-51966.html
问题正在解决。借鉴以上贴子

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