按回车才执行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 按回车才执行

共有1806人关注过本帖树形打印复制链接主题：按回车才执行

yangwenghd

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2707 积分：18056 威望：0 精华：0 注册：2013/4/9 10:41:00

按回车才执行 发帖心情

Post By：2017/2/3 19:08:00 [只看该作者]

如果写入这段代码

Dim btn As WinForm.Button = Forms("听写练习窗口").Controls("Button6")

btn.PerformClick() '按钮关联

在TextBox1 事件，但是如果只有按回车才执行的应该写在什么事件里面啊

感谢感谢

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/2/3 20:21:00 [只看该作者]

KeyDown事件

http://www.foxtable.com/webhelp/scr/0741.htm

有点色

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/2/3 20:56:00 [只看该作者]

keyDown事件

If e.keycode = keys.Enter Then
    e.cancel = True
    Dim btn As WinForm.Button = Forms("听写练习窗口").Controls("Button6")
    btn.PerformClick() '按钮关联
End If

yangwenghd

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2707 积分：18056 威望：0 精华：0 注册：2013/4/9 10:41:00

Post By：2017/2/3 21:01:00 [只看该作者]

Tables("主窗口_Table1").Filter = "目录_课题 Like '%" & e.Form.Controls("Label12").Text & "%'" And "(目录_状态= '已学习')" ' 筛选出行\

这个是那里不对啊感谢感谢

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/2/3 21:04:00 [只看该作者]

Tables("主窗口_Table1").Filter = "目录_课题 Like '%" & e.Form.Controls("Label12").Text & "%' And 目录_状态= '已学习'"

yangwenghd

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：九尾狐帖子：2707 积分：18056 威望：0 精华：0 注册：2013/4/9 10:41:00

Post By：2017/2/3 21:17:00 [只看该作者]

谢谢你有点蓝还有有点色。可以了感谢

下一主题 >> << 上一主题

主题：按回车才执行