- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 输入关键词后点回车进行搜索的代码改如何编写？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=44810)
-- 发布时间：2014/1/9 13:56:00
-- 输入关键词后点回车进行搜索的代码改如何编写？
我已经做好了一个基本框架，输入信息到文本框内后，点击搜索就可以按照我的货号，价格和交期进行查询筛选
但是要是我想输入关键词后不通过鼠标点击，直接按回车后执行搜索操作的话，是要设置文本框的事件代码吗？
附件中是我做的一个简单窗口，通过输入信息按回车来进行搜索查询
请各位高手指点一下，看看代码应该怎么来做
谢谢
此主题相关图片如下：foxtable.jpg
此主题相关图片如下：foxtable.jpg-- 发布时间：2014/1/9 14:17:00
--
在KeyDown 事件写代码即可.http://www.foxtable.com/help/topics/0741.htm
-- 发布时间：2014/1/9 14:35:00
-- 回复：（Bin）在KeyDown 事件写代码即可.http://www.f...
问题是在于，我填写在KEYDOWN事件的代码要怎么样才能和搜索功能连起来
输入代码语言是什么样的
请教教我
谢谢
-- 发布时间：2014/1/9 14:47:00
--
额,这个和普通搜索是一样的啊.都是设置FIlter条件啊 http://www.foxtable.com/help/topics/1432.htm
if e.form.controls("TextBox1").text <> "" then
tables("表名").Filter="货号=\'" & e.form.controls("TextBox1").text & "\'"
end if
新手建议先看一下我们的帮助
打开软件按F1或者点击左上角的小问号,可以打开非常详细的图文帮助
-- 发布时间：2014/1/9 16:13:00
--
在btn的 KEYDOWN调用搜索按钮事件
If e.KeyCode=Keys.Enter Then
Dim btn As WinForm.Button = Forms("采购订单").Controls("Query")
btn.PerformClick()
Forms("采购订单").Controls("QUERYTEXT").Select
End If
-- 发布时间：2014/1/9 17:26:00
--
检测到回车键之后，模拟单击查询按钮：
http://www.foxtable.com/help/topics/2309.htm
Keydown事件代码：
If e.KeyCode=Keys.Enter Then
Dim btn As WinForm.Button = e.Form.Controls("查询按钮名称")
btn.PerformClick()
End If