0

さて、私はこのコードを持っています:

Public Sub FuncKeysModule(ByVal value As Keys)
    'Check what function key is in a pressed state, and then perform the corresponding action.
    Select Case value
        Case Keys.F8
            spam.Enabled = True
            TabControl1.SelectedIndex = 0
            state = "Activo"
        Case Keys.F9
            spam.Enabled = False
            TabControl1.SelectedIndex = 1
            state = "Parado"
    End Select
End Sub

    Private Sub frmMain_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
    If e.KeyValue = Keys.F1 Or Keys.F2 Or Keys.F3 Or Keys.F4 Or Keys.F5 Or Keys.F6 Or Keys.F7 Or Keys.F8 Or Keys.F9 Or Keys.F10 Or Keys.F11 Or Keys.F12 Then
        FuncKeysModule(e.KeyValue)
        e.Handled = True
    End If
End Sub

F8 または F9 を押すと、フォームが表示される関数を呼び出します。しかし、私には男がいます。フォームが最小化または選択解除されている場合 (TopMost が True の場合)、どうすればそれを呼び出すことができますか?

ありがとう。;)


私はこのコードを持っています:

http://pastebin.com/Vr8UjVnF

しかし、プロジェクトを実行するたびに例外が発生し、キーボードフックを設定できませんでした

私に何ができる?:S

4

1 に答える 1