[_(アンダーバー)の感知について

OS:windows2000pro
VB:VB6.0sp5

keyDown関数を用いて、アンダーバーを感知しようとしているのですが、できません

keycode,shift = (1)226,0 = [\]
keycode,shift = (2)16,1 = [shift]
となります

どのようにすれば良いのでしょうか？

　また、keyDown関数にて感知可能の場合
keycode,shift = ？,？ の場合でしょうか？
よろしくお願いいたします

No.2 ベストアンサー 回答者： AlexSuns 回答日時： 2005/04/14 11:16

調査方法：

テキストボックスを2つ配置
設定するプロパティは「Multiline」をTrueにする

テキストボックスのキーイベントにて下記のように
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
　　
　　'キー情報出力
　　Me.Text2.SelStart = Len(Me.Text2.Text) + 1
　　Me.Text2.SelText = "KeyCode -> " & KeyCode & " Shift -> " & Shift & vbCrLf
　　
End Sub

この様にすれば、直前に押下されたキー情報を取得できます


ちなみに
　　'アンダースコア検知
　　If (Shift And vbShiftMask) And (KeyCode = 226) Then
　　　　Me.Text2.SelStart = Len(Me.Text2.Text) + 1
　　　　Me.Text2.SelText = "アンダースコアです" & vbCrLf
　　End If


あと理解しているといいもの
Shift、Ctrl、および Alt の各キーの状態の検出
http://www.microsoft.com/japan/developer/library …

No.1 回答者： ctrlzr 回答日時： 2005/04/14 11:00

keyPressイベントではダメですか？

keyPressは入力した文字の検知、keyDownは押されたキーの検知です。