FORMにボタンを貼り付けます。
そのボタンを押すとデバックが終了するようにソースを作りました。
'< 終了ボタンの処理 >
Private Sub endbtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles endbtn.Click
Try
If MessageBox.Show(" 終了してもよろしいですか?", _
"", MessageBoxButtons.YesNo) _
= System.Windows.Forms.DialogResult.No Then
Return
End If
Me.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
ボタンを押せばデバックを終了することは出来るのですがF10キーを使ってデバックを終了させるにはどういう風にすればいいのでしょうか??
下記のようことを試して下さい。
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 0 Then
Select Case KeyCode
Case vbKeyF1
'F1を押した時の処理
Case vbKeyF2
'F2を押した時の処理
End select
End if
End Sub
8月さんありがとうございます。
出来ました!!