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 回答日時： 2006/08/08 11:29

KeyDownの方で判定してはだめですか？

こちらなら変換の際のEnterは拾いません。

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

この回答へのお礼

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

お礼日時：2006/08/09 08:43