锐客网

  1. 首页 > 生活百科 > it技术 > >

关于vb.net禁用事件的信息

IT技术Keydown

VB.NET中怎样在窗体上禁用控件的键盘事件Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
If sender Is Me Then MsgBox(e.KeyData.ToStringvbCrLfsender.ToString)
End Sub
Private Sub Button1_KeyDown(sender As Object, e As KeyEventArgs) Handles Button1.KeyDown
If sender Is Me Then MsgBox(e.KeyData.ToStringvbCrLfsender.ToString)
End Sub
这样就行了，第一个过程if语句结果为真，第二个过程if语句结果为假 ， 你的所有问题都可通过if判断语句解决，msgbox代码只是做个测试，实际为你响应form键盘事件的代码 。
vb.net 禁用第三方 控件滚轮事件拦截窗口程序消息可以解决
参考 VB王国荣API讲座 讲消息的那章
几个API就可以搞定
vb.net（2013版本）如何禁止键盘事件 。Dim key_state As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.KeyPreview = True '设置窗体响应键盘操作
End Sub
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
'MsgBox(e.KeyCode)'这行开启可以测试你输入的按键代码
If key_state = 0 Then e.Handled = True '取消操作
Select Case e.KeyCode
Case 49'按键1
'................操作脚本
Case 50'按键2
'................操作脚本
End Select
End Sub
Private Sub Form1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Me.KeyPress
e.Handled = True '取消操作
End Sub
'*******************************************************************************另一种方法
AddHandler Me.KeyDown, AddressOf Form1_KeyDown'需要时加入事件
RemoveHandler Me.KeyDown, AddressOf Form1_KeyDown '不需要时删除事件
【关于vb.net禁用事件的信息】vb.net禁用事件的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.net禁用事件的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：erp仓库管理系统登录入口，erp仓储管理系统

    下一篇：太原直播卖货教程，太原哪里有卖直播架的