vb點虐 禁止事件的簡單介紹

vb點虐 禁用第三方 控件滾輪事件

攔截窗口程序消息可以解決

創(chuàng)新互聯(lián)建站主營常山網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司,主營網(wǎng)站建設(shè)方案,重慶APP軟件開發(fā),常山h5成都小程序開發(fā)搭建,常山網(wǎng)站營銷推廣歡迎常山等地區(qū)企業(yè)咨詢

參考 VB王國榮API講座 講消息的那章

幾個API就可以搞定

VB.NET中怎樣在窗體上禁用控件的鍵盤事件

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown

If sender Is Me Then MsgBox(e.KeyData.ToString vbCrLf sender.ToString)

End Sub

Private Sub Button1_KeyDown(sender As Object, e As KeyEventArgs) Handles Button1.KeyDown

If sender Is Me Then MsgBox(e.KeyData.ToString vbCrLf sender.ToString)

End Sub

這樣就行了，第一個過程if語句結(jié)果為真，第二個過程if語句結(jié)果為假，你的所有問題都可通過if判斷語句解決，msgbox代碼只是做個測試，實際為你響應(yīng)form鍵盤事件的代碼。

vb點虐 （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 '設(shè)置窗體響應(yīng)鍵盤操作

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點虐 如何讓一個控件不接收鼠標(biāo)事件

接收事件是無法屏蔽的，但是你可以不處理這個事件啊，就當(dāng)它沒發(fā)生不就行了

分享標(biāo)題：vb點虐 禁止事件的簡單介紹
轉(zhuǎn)載注明：http://muchs.cn/article40/ddijcho.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供Google、網(wǎng)站排名、網(wǎng)站建設(shè)、軟件開發(fā)、定制開發(fā)、移動網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)