第一步:Form的KeyPreview的属性为True
第二步:按照需要把TabIndex按顺序设置
第三步:编写一个方法,代码如下:
Private Sub FocusMove()Sub FocusMove(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles ControlName1.KeyPress, ControlName2.KeyPress
If e.KeyChar = ChrW(13) Then
SelectNextControl(sender, True, True, True, False)
End If
End Sub
SelectNextControl的说明来自MSDN:激活下一个控件。
[Visual Basic]
Public Function SelectNextControl(ByVal ctl As Control, ByVal forward As Boolean, ByVal tabStopOnly As Boolean, ByVal nested As Boolean, ByVal wrap As Boolean ) As Boolean
ctl 从其上开始搜索的 Control。
forward 如果为 true 则在 Tab 键顺序中前移;如果为 false 则在 Tab 键顺序中后移。
tabStopOnly true 表示忽略 TabStop 属性设置为 false 的控件;false 表示不忽略。
nested true 表示包括嵌套子控件(子控件的子级);false 表示不包括。
wrap true 表示在到达最后一个控件之后从 Tab 键顺序中第一个控件开始继续搜索;false 表示不继续搜索。
返回值 如果控件已激活,则为 true;否则为 false。
告诉QQ/MSN上的好友
用新浪ViVi收藏此页
http://www.xggx.info/trackback.asp?tbID=2051
http://www.xggx.info/trackback.asp?tbID=2051&CP=GBK
用户登陆
站点日历
最新日志
站点统计
日志搜索
在VB.NET中用键盘的回车键控制焦点移动 [ 日期:2009-02-04 ] [ 来自: