
テキストボックスにフォーカスがあり、TABキーが押された時のイベントをひろいたいのですが、KeyPressもKeyDownもイベントが発生しません。
(If KeyCode = vbKeyTab Then
MsgBox "タブキー"
End If
If KeyAscii = vbKeyTab Then ~
のようなコードを記述してもメッセージが表示されない)
ヘルプにはKeyDownでは発生しないという記述がありますが、KeyPressではイベントがひろえるようなことが書いてあるのにひろえないので困っています。
なにかよい方法はありませんでしょうか。
わかりにくい説明で申し訳ありませんが困ってます。
宜しくお願いします。
No.3ベストアンサー
- 回答日時:
テキストボックスのほかに、コントロールを貼り付けていませんか?
他のコントロールにタブ移動していてイベントがこなくなっているのでは?
フォーカスを当てられるほかのコントロールのTabStopをFalseにすればいいのでは?
違ってたらすんません。
じゃ、そゆことで。
貼り付けてました・・・。
見た目は全部ラベルだったのでおかしいなとよくよく見たらテキストボックスの不活性継承の為のピクチャボックスがTabstop=Trueになってました。
おかげさまで無事TAB拾えました。どうもありがとうございました。
No.4
- 回答日時:
No.2
- 回答日時:
KeyPressイベントなら、次のどれでも出来るはずです。
(確認済)例1)
Dim str As String
str = Chr(KeyAscii)
If str = vbTab Then
MsgBox "Tab key!"
End If
例2)
If KeyAscii = 9 Then
MsgBox "Tab key!"
End If
例3)
If KeyAscii = vbKeyTab Then
MsgBox "Tab key!"
End If
No.1
- 回答日時:
こんにちは。
itohhといいます。KeyPressとKeyDownイベントの引数ですが、意味合いが違います。
KeyPressイベントのKeyAsciiは、Asciiコードが設定されてきます。
KeyDownイベントのKeyCodeは、VBで決めているキーコード定数が設定されてきます。
KeyPressイベントでTabを拾いたい場合は、以下のように行います。
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim Rtn As Integer
If KeyAscii = Asc(vbTab) Then
Rtn = MsgBox("Hit!!", vbOKOnly)
End If
End Sub
質問時にコピーしてコードを書いてしまったのでKeyPressとKeyDownのコードを同じにしてしまいました・・・。間違いのご指摘ありがとうございます。
無事解決しました。どうもありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
いちばん失敗した人決定戦
あなたの「告白」での大失敗を教えてください。
-
「これはヤバかったな」という遅刻エピソード
寝坊だったり、不測の事態だったり、いずれにしても遅刻の思い出はいつ思い出しても冷や汗をかいてしまいますよね。
-
これ何て呼びますか
あなたのお住いの地域で、これ、何て呼びますか?
-
チョコミントアイス
得意ですか?不得意ですか?できれば理由も教えてください。
-
カラオケの鉄板ソング
歌えばその場が絶対盛り上がる「鉄板ソング」を教えてください!
-
矢印(左右)キーでイベントを発生させたい。
Visual Basic(VBA)
-
Ctrl + Cなど複数の入力キーの感知
Visual Basic(VBA)
-
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
-
4
エクセル TABキーの動きをマクロで
Excel(エクセル)
-
5
VB.NETで他のプロジェクトで作成したフォームを使う方法
Visual Basic(VBA)
-
6
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
7
SPREAD(GrapeCity)のセルにフォーカスを設定するにはどうしたらいいのでしょうか?
Visual Basic(VBA)
-
8
FORMが開いているかどうかの確認方法
Visual Basic(VBA)
-
9
VBのReturnの使い方
Visual Basic(VBA)
-
10
DateTimePickerでに年月までしか選択できないようにしたいです。
Visual Basic(VBA)
-
11
配列の重複する値とその個数を取得したい
Visual Basic(VBA)
-
12
VB.NETでのイベントの途中終了
Visual Basic(VBA)
-
13
TextBoxでEnterキーを押すと、にあるButtonを押したのと同じ効果を出す方法
Visual Basic(VBA)
-
14
DateTimePickerに値を入れたいのですが…
Visual Basic(VBA)
-
15
フォームを開くときに、コンボボックスの値を選択(アクセスVBA)
Visual Basic(VBA)
-
16
コンボボックスの一部のアイテムを選択不可能に
C言語・C++・C#
-
17
別フォームから戻ったときのイベント
Visual Basic(VBA)
-
18
フォームの再読み込み
Visual Basic(VBA)
-
19
どこにもフォーカスを当てたくない
Access(アクセス)
-
20
テキストボックスのvalueとtextの違い
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
一定時間操作されないと自動で...
-
タブキー押下時のイベントをひ...
-
VBA・WebBrowserコントロールで...
-
Excel VBA マクロ実行中のみテンキ...
-
IEで、BackSpaceで「戻る」機能...
-
Enterキーでもコントロール間を...
-
特定のキーを押すまでループさ...
-
コントロールキーが押されたキ...
-
EXCEL VBA----ユーザーフォーム...
-
WPFでの時刻入力コントロールに...
-
ダイアログベースでのキー入力...
-
VB.NETのDropDownListをReadOnl...
-
フォーカスについてお教えください
-
(VBA)チェックボックスのclick...
-
「ご処理進めて頂きますようお...
-
エクセルで、日付を入力すると...
-
エクセルVBAで、MsgBox やInput...
-
CloseとDisposeの違い
-
VBA リストボックスをダブルク...
-
UPS警告音を止めたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VB】タブ切り替え時のイベント
-
特定のキーを押すまでループさ...
-
(VBA)チェックボックスのclick...
-
タブキー押下時のイベントをひ...
-
Visual Basic 6.0 コンボボック...
-
コンボボックスにキー入力をさ...
-
一定時間操作されないと自動で...
-
テキストボックスの入力文字を1...
-
WPFでの時刻入力コントロールに...
-
エクセルVBAのテキストボック、...
-
キーイベントを擬似的に発生さ...
-
VB.NETのDropDownListをReadOnl...
-
C# WMPメディアの終了検知 その2
-
VB.NETでフォームがない...
-
Access データ表示 完了時のイ...
-
KEYPREVIEW=TRUEについて。意味...
-
ListViewで、PageDownキーイベ...
-
フォーカスについてお教えください
-
自作ダイアログボックス中のエ...
-
イベントハンドラが取得できな...
おすすめ情報