[ツリー表示へ] [ワード検索] [Home]
タイトル ： Re: エンターKeyでFocus移動 投稿日 ： 2009/11/13(Fri) 08:35 投稿者 ： 花ちゃん
| > '--------------------------------------------------------------- > Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _ > ByVal Shift As Integer) > If KeyCode = vbKeyReturn Then > Call CommandButton1_Click > End If > End Sub 多分、Return キーを押した事になっているので、エクセルのオプションの設定で 設定されている方向に移動しているのではないでしょうか？ (VB6.0 の場合は、テキストボックス上でReturn キーを押しても移動しない) 試しては、いませんが下記のように変更して見たらどうでしょうか？ (Return キーをキャンセルする） Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) If KeyAscii = vbKeyReturn Then KeyAscii = 0 Call CommandButton1_Click End If End Sub 因みに通常は、VB6.0 の場合でも、KeyDown イベントでは処理せず、KeyPress イベントを 使用します。(移動しない代わりにBeep 音が鳴りませんか。) |
をクリックするとツリー全体を一括表示します） - エンターKeyでFocus移動 - ケイ 09/11/13-07:49No.14253