TextBox内で日本語入力中を判断する方法

質問

TextBox内で「Enter」PUSHの有無を下記コードで実現しておりますが
Private Sub TextBox1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
　　　 処理
End If
End Sub
日本語変換の際（もじ→文字）の「Enter」を処理対象外にする方法を教えていただけないでしょうか？
もしくは日本語入力中を判断する方法を教えていただけないでしょうか？
言語はＶＢ6.0です。
よろしくお願い致します。

回答No.1

NYOI · ベストアンサー

KeyDownの方で判定してはだめですか？
こちらなら変換の際のEnterは拾いません。

Private Sub TextBox1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
　　　 処理
End If
End Sub

お礼

KeyDownで実現できました。
ありがとうございます。