ショートカットについて

解決

さくま 2006-10-12 19:23:56 No: 96895

VB6.0 XP使用

フォームがアクティブになっている際、Ctrl+Shift+F12を３つ同時押しで
コマンドボタンのクリックイベント(あるリストの一覧表示)を呼びたいのですが、
可能でしょうか。
（※ほんとはCtrl+Shift+Delが理想なのですがWindowsイベントが呼ばれそうなので・・・）

サンプルを作ってみたのですが、Ctrl+Shiftまでは判定できたのですが(Shift = 3)
その上にF12というのがよくわからなくて・・・。
F12 が keyCode 123というのはわかるのですが・・・。

初心者的な質問で大変申し訳ございませんが宜しくお願いします。

さくま 2006-10-12 19:31:27 No: 96896

すみませんできました。
フォームプロパティのKeyPreviewがFalseになっていたため動作しなかっただけでした。
ご迷惑をお掛けしました。

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)

    If KeyCode = 123 And Shift = 3 Then
          Call Command1_Click
    End If

End Sub