掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
非アクティブでキー入力を認識させるには？ (ID：74999)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
APIを使って下のように作ってみたのですがフォーカスを他のアプリケーションに 移動してもキー入力（ESC)を認識してくれるようにするにはどうしたらいいのでしょうか？ マウス座標の方は認識するのですけど。。 かなり省略してかいているのでよく理解できないかもしれませんがよろしくお願いします。もちろんGetKeyStateの宣言はしています。 Private Sub Timer1_Timer() Dim p As POINTAPI Dim lngVirtualKeyCode As Integer ' 仮想キーボードのキーの状態を取得 lngVirtualKeyCode = GetKeyState(VK_ESCAPE) Label1.Caption = Right("00" & Hex(lngVirtualKeyCode), 2) 'マウス座標の取得 GetCursorPos p Label2.Caption = p.X & "," & p.Y End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.