半角＝10文字
全角＝5文字

strData ="あいうえおかきくけこ"
intByte = System.Text.Encoding.GetEncoding("Shift_JIS").GetByteCount(strData)
If intByte > "10" Then
  ※　ここです　※
End If

現在、上記の入力制限をかけようと思うのですがこの後が分からずに困っています。
10バイト以上の文字は切り捨てて
strData ="あいうえお"
を取得したいのです。
半角・全角混じっている文字でも対応できるような方法を教えて下さい。

> If intByte > "10" Then
>   ※　ここです　※
> End If

If intByte > 10 Then  ですね

ここの Tips 集の 文字列操作 の中の　文字列を指定の幅(バイト数)にカットする
（漢字分断回避） (1) 等をご覧下さい。

返信が遅くなりました…。
花ちゃんさんの方法で行けました。
ありがとうございました。

もう二つ質問です。
現在スプレッドを使用しているのですが、
�@スプレッドの中で指定している最大文字数の取得方法
�Aセルが移動した時に文字の入力制限がチェックされる(現在はChangeイベントで使用)ので
　「Enter」キーを押した時に入力制限のチェックができる方法

上記2つができません。
調べてもあまりヒットしなかったので、ご教授お願いします。

[初めにお読み下さい]
http://hanatyan.sakura.ne.jp/hazimeni.htm#keijiban

http://www2.moug.net/bbs/program/20070813000002.htm