新建一個(gè)Form1把Form1的KeyPreview改成True
創(chuàng)新互聯(lián)公司專業(yè)提供成都主機(jī)托管四川主機(jī)托管成都服務(wù)器托管四川服務(wù)器托管,支持按月付款!我們的承諾:貴族品質(zhì)、平民價(jià)格,機(jī)房位于中國(guó)電信/網(wǎng)通/移動(dòng)機(jī)房,德陽(yáng)機(jī)房托管服務(wù)有保障!
拖入一個(gè)Button1到Form1上面
然后加入以下代碼
Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
If e.KeyData = (Keys.Alt Or Keys.G) Then
Button1.PerformClick() '或者用Button1_Click(Nothing, New EventArgs)
'快捷鍵Alt+G觸發(fā)Button1_Click()事件。
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Button1.Size = New Size(180, 23)
Button1.Text = "我被局部快捷鍵給召喚了~"
End Sub
這個(gè)容易啊。把按鈕屬性的default設(shè)為ture就行了。要想快捷鍵(ESC)就把cancel設(shè)為ture。
如果是用Alt組合健,最簡(jiǎn)單的方法就是,在按鈕的Text屬性里加個(gè)符合,比如想用Alt+A來(lái)控制Button1的話,就在Button1的Text屬性上加一個(gè)A即可。比如Text屬性是“我是按鈕(A)”,如圖所示,那么在按下Alt+A就可以執(zhí)行Button1_Click命令了,呵呵