投稿日 | : 2004/08/06(Fri) 00:25 |
投稿者 | : Numawo |
Eメール | : redwolf_Numao@hotmail.com |
URL | : |
タイトル | : Re^2: コンボボックスでの↑↓キー |
お二方、投稿どうもありがとうございます。
KeyPressにDebug.Printをはさんだところ、矢印キーはイベント起こらなかったので、
KeyDownにDebug.Printをはさんで調べると、
矢印キーは、@KeyDown、AClickをいう順でイベントが発生することがわかりました。
そこで、kamurinさんの案を少々手直しして
Pravite Sub Combo1_keyDown(略)
If KeyCode = 38 Or KeyCode = 40 then
flgClick = False
End If
End Sub
Private Sub Combo1_Click(略)
If flgClick = True then
Combo2.enabled = True
Combo2.SetFocus
Else
flgClick = True
End if
End Sub
で期待する動作が実行できそうです。
どうもありがとうございました。