- Private Sub GcClassicFunctionKey_FunctionKeyPress_1(sender As Object, e As GrapeCity.Win.Bars.FunctionKeyPressEventArgs) Handles GcClassicFunctionKey1.FunctionKeyPress
- Select Case e.KeyIndex
- Case 4
- Console.WriteLine("1")
- 'MsgBox("1")
- Case 5
- 'MsgBox("1")
- Me.BeginInvoke(
- Sub()
- MsgBox("1")
- End Sub
- )
- End Select
- End Sub
复制代码
再试试 |