上面的本意是要用回车键来实现Tab键的功能。你用下面的代码来实现。
先将Form的KeyPreview属性设为True
再加如下代码
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{Tab}", True
End If
End Sub
先将Form的KeyPreview属性设为True
再加如下代码
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
SendKeys "{Tab}", True
End If
End Sub
解决方案 »
- 2011散分贴!
- 【递归调用终止】程序运行中,要求立即终止执行,并返回到程序界面
- 请问在ComboBox中怎样才能选择不同的内容时产生以下所需功能
- 版主请看怎样抓取底层窗体的显示内容变成图像在上层窗体里显示
- 急...请教:如何实现listview控件的排序问题
- 可能是文件关联 怎样才能让IE启动时同时启动我的程序
- 如何快速的填充一long类型的数组的每个元素为一固定值啊?
- 关于RichTextBox的剪切、粘贴等问题!
- [金山毒霸]的[病毒防火墙]能否防御网上攻击?[金山毒霸]自带的[邮件监控]好用吗?
- 救命,VB高手请进来!!!!!
- 注册表操作问题
- 怎么屏弊掉Ctrl+alt+del和Alt+F4???
如果用回车键来实现TAB 的功能,必须对每个控件都定义。不然只对定义的有用,没定义的则不行。这样太麻烦,不知有没有更简单的方法,使回车键彻底实现TAB功能??
还有,上面的代码:count 是窗体上的控件总数。Screen.ActiveControl.TabIndex 取得活动控件的tabindex值,
知道这些,代码就不难理解了。