【VB2005】テキストボックス内の文字列をバイト数で制限したい

検索してもAPIを使用するものや、C#のソースしか無かったので質問させてください。

表題通りなのですが、テキストボックスに５バイトまで入力し、５バイトを超えたら入力できないように制御したいのですが、経験が浅いためよくわかりません。
もしよかったら詳しい方、教えていただけないでしょうか。
たいへん恐れ入りますがよろしくお願いいたします。ｍ(＿ ＿;)ｍ

No.2 ベストアンサー 回答者： NYOI 回答日時： 2007/07/23 11:19

５バイトとか書いていることから推測すると、この場合のバイト数とは、Shift_JISでのバイト数のことかな？

VB2005では基本的に文字列はUnicode扱いなので、いわゆる半角も全角も２バイトです。
Shift_JISで考えるなら、例えばKeyPressイベントで


Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
'現在入力されている文字が５バイトだったらそれ以上入力させない。
'但しBackSpaceは許可
If System.Text.Encoding.GetEncoding("Shift_JIS").GetByteCount(TextBox1.Text) >= 5 _
AndAlso e.KeyChar <> Chr(Keys.Back) Then
e.Handled = True
End If
End Sub
とか。

この回答へのお礼

なるほど！
教えてもらった方法で行けそうです。
たいへんありがとうございました。
感謝感謝

お礼日時：2007/07/24 11:19

No.1 回答者： imogasi 回答日時： 2007/07/23 10:09

テキストボックスのプロパティにMaxLengthというのがあるが

それではダメですか。設定数桁以上は受け付けないようだが。
それ以外は１文字入力したら通知してもらうAPIを使う必要があるように思う。
Enterで入力確定後の長さチェックでダメならば。

この回答へのお礼

ありがとうございました。

お礼日時：2007/07/24 11:19