以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于回车键的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=131427)

--  作者:蓝蚂蚁
--  发布时间:2019/2/26 8:41:00
--  关于回车键的问题

图片点击可在新窗口打开查看此主题相关图片如下:image 1.jpg
图片点击可在新窗口打开查看
上面的图片中在TextBox1/2/3中某个或全部输入查询关键字后,按回车键,如何实现模拟鼠标点击“查询”按钮,进行查询?
--  作者:有点甜
--  发布时间:2019/2/26 8:43:00
--  

keydown事件,写代码

 

If e.keycode = 13 Then

    e.form.controls("button1").performclick

End If


--  作者:蓝蚂蚁
--  发布时间:2019/2/26 8:48:00
--  

这个keydown事件是指每个TextBox的吗,是不是说要在每个TextBox的keydown事件进行设置?



--  作者:蓝蚂蚁
--  发布时间:2019/2/26 9:26:00
--  
明白了 是窗口的keydown事件,谢谢老师!
--  作者:蓝蚂蚁
--  发布时间:2019/2/26 9:29:00
--  
发现了个问题:第一次打开这个窗口时 按照上面的代码,要按回车键2次才执行。之后可以按一次就执行,是不是跟这个“查询”的焦点有关?
--  作者:有点甜
--  发布时间:2019/2/26 9:48:00
--  
以下是引用蓝蚂蚁在2019/2/26 9:29:00的发言:
发现了个问题:第一次打开这个窗口时 按照上面的代码,要按回车键2次才执行。之后可以按一次就执行,是不是跟这个“查询”的焦点有关?

 

比如

 

If e.keycode = 13 Then

    e.form.controls("button1").Select

    e.form.controls("button1").performclick

End If


--  作者:蓝蚂蚁
--  发布时间:2019/2/26 10:02:00
--  
完美解决 谢谢