VB2005 TextBoxに何も入力しない場合のエラー

VB入門者なので、よろしくお願いします。
VB2005で、Textboxに何も文字を入力しないで
Button1をクリックしたら、
　MessageBox.Show("何か入力してください", "エラーメッセージ")
の様に何かエラーメッセージが表示されるようにしたいのですが、何かいい方法はありますか？
ちなみにTextboxに入力するものは、ひらがな、数字、漢字、ローマ字
なんでも入力できるようにしています。

No.1 ベストアンサー 回答者： kuroooooo 回答日時： 2007/12/07 11:40

Button1のクリックイベント内に

If TextBox1.Text.Length = 0 Then
　MessageBox.Show("何か入力してください", "エラーメッセージ")
End If
あたりかな。

この回答へのお礼

そんな方法があったとは、早速やってみたいと思います。
kurooooooさん、返信ありがとうございました。

お礼日時：2007/12/07 11:48

No.2 回答者： kokorone 回答日時： 2007/12/07 11:43

何が聞きたいかよくわかりません。

If text1.trim="" then
'エラー処理
text1.focus()
End If
でいいのではないでしょうか？
ポイント：
・空白（全角・半角）のみの場合も未記入として、エラーチェック
する。
・エラーになったテキストに、フォーカスを移動する
といったところでしょうか？

この回答へのお礼

説明するのが下手ですみません。
kokoroneさんのポイントを参考にさせて頂き、
早速作ってみたいと思います。
kokoroneさん、参考になる意見ありがとうございました。

お礼日時：2007/12/07 12:25