2020年5月22日 星期五

vb.net 在Form按ESC並關閉 (Form全局) [Press ESC to Close] 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
    Protected Overrides Function ProcessDialogKey(ByVal keyData As System.Windows.Forms.Keys) As Boolean
        Select Case keyData
            Case Keys.Escape
                Me.Close()
                Return True
            Case Keys.Enter
                Button1.PerformClick()
                Return True
        End Select
        Return MyBase.ProcessDialogKey(keyData)
    End Function
於
標籤： , , , ,

沒有留言:

張貼留言

訂閱： 張貼留言 (Atom)