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


  共有1807人关注过本帖树形打印复制链接

主题:按回车才执行

帅哥哟,离线,有人找我吗?
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 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  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 [只看该作者]

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

 回到顶部