timerイベントをつかって、キーボードのEndを押したら、Text1へフォーカスを移動させたいと思っています。
Endキーが押されたというのをどのようにしたらいいですか?
お願いします。
タイマ コントロールを使って、一定時間だけってこと?
そんなことする意味がないから違うかー。
MSFlexGridをつかうとEndキーが使えないので、
timerイベントでEndが押されたらを判定して、Text1にフォーカスを
もっていきたいのです。
> MSFlexGridをつかうとEndキーが使えないので
あれ? 当方では、Endキーの判定もできましたよ。
Private Sub MSFlexGrid1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyEnd Then
Me.Text1.SetFocus
End If
End Sub
> timerイベントでEndが押されたらを判定して
であれば、GetKeyboardState APIでしょうか。
あるいは趣を変えて、DirectX (DirectInputDevice) の、
GetDeviceStateKeyboard メソッドを試してみるとか。
魔界の仮面弁士さんありがとうございました。
出来ました。
Private sub MSFlexGrid1_KeyDown(keycode as integer,shift as integer)
select case keycode
case vbkeyend
Form1.text1.setfocus
end select
end sub
このようにやっても出来なかったので、無理かと思ってました。
ありがとうございました。