[轉貼]VB.Net2005中捕獲鍵盤事件（以按下回車鍵為例）
1、VB.Net 2005下，在表單設計起代碼中加入：MyBase.KeyPreview = True#Region " Windows 表單設計器生成的代碼 "
Public Sub New()
MyBase.New()
'在此加入下面這句話，使在視窗中任何的按鍵都只執行一個回應
MyBase.KeyPreview = True
'該調用是 Windows 表單設計器所必需的。
InitializeComponent()
'在 InitializeComponent() 調用之後添加任何初始化
End Sub
2、重載OnKeyPress
Protected Overrides Sub OnKeyPress()Sub OnKeyPress()Sub OnKeyPress()Sub OnKeyPress(ByVal e As System.Windows.Forms.KeyPressEventArgs)
Dim key As String
key = e.KeyChar
'檢驗按鍵是否為回車鍵，如果是就把焦點附給button1，並執行Click命令
If key = Microsoft.VisualBasic.ChrW(13) Then
button1.Focus()
button1.PerformClick()
End If
End Sub
頁:
[1]