因为你用的是H,是十六进制,你可以写成
网站建设哪家好,找创新互联!专注于网页设计、网站建设、微信开发、小程序开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了宝清免费建站欢迎大家使用!
Const VK_ALT=18
或者
Const VK_ALT=H12
十六进制的H12就是十进制的18。
If e.Shift And e.KeyCode = Keys.Tab Then
MsgBox("Is ""Shift+Tab""")
End If
'----------------------edit by yiensoha------2017.05.02-----------------------------------------
Private Sub txtMain_KeyDown(sender As Object, e As KeyEventArgs) Handles txtMain.KeyDown
If (e.KeyCode = 9) Then '表示tab键按下
txtMain.Text = "keytab"
End If
End Sub
在这里一定要注意:如果你要识别tab键,那么必须保证所有控件的tabstop属性均为false,否则的话,tab键会当做控件之间的跳转功能,而不是作为tab键按下。