2

vb.netで別のフォームを開くには、（ Ctrl+ Shift+ ）などの3つの異なるキーを使用する必要があります。F12

私を助けてください。

4

3 に答える 3

1

keydown イベントで、これらのキーにアクセスできます。たとえば、このハンドラーでは...

Private Sub keyDown(ByVal Sender As Object, ByVal e As KeyEventArgs) handles me.keydown

...ブール値 e.Alt、e.Control、および e.Shift を使用して、これらのコントロール キーが押されているかどうかを確認できます。次に、次のようなことができます。

Select case CInt(e.keycode)
  case Keys.F12
    if e.Control andalso e.Shift then frm.ShowDialog
    ...
于 2013-01-17T06:29:35.913 に答える
1

この関数を定義します:

Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As IntPtr) As Short

したがって、どのキーが同時に押されているかを確認できます。

'For example, keys "arrow up" and letter "W"
If GetKeyState(87) < 0 AndAlso GetKeyState(38) < 0 Then
     'Do something
End If

また、KeyDown イベントまたはタイマーなどでキーを確認できます。お役に立てれば。

于 2013-01-17T11:13:55.463 に答える
1

xpdaの回答のようにキーイベントで処理できます。または、同じアクションを実行するMenuItemが既にある場合は、ToolStripMenuItemのShortcutKeysプロパティを設定できます。

于 2013-01-17T14:07:46.380 に答える