Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

74697 / 76732

←次へ　｜　前へ→


	【6495】Re:すみません・・・。

Salem - 03/7/4(金) 11:22 -


	引用なし

	パスワード

▼つんさん：
>>説明が足りなかったです・・・。えっとですね、
>>全角で20文字　半角で40文字　入力制限をしたいんですよ・・・。
>>
>>*************************************************
>>全角：あいうえおかきくけこさしすせそたちつてと
>>半角：1234567890123456789012345678901234567890
>>*************************************************
>
>あ、ほんなら、こちらのスレッドが参考になると思います♪
>[#3255]

ありがとうございます。
バイト数を取得まではできました。

しかし、制限するにはどうしたら良いかわかりません。
半角で40文字制限できましたが、全角で20文字制限ができません。

aa=LenB(StrConv(TextBox1.Text, vbFromUnicode))　
if aa = 40 then
　入力制限処理
　TextBox1.Value = LeftB(TextBox1.Value, 80)
　↑このようにすると半角制限ができるのですが、
　　全角制限はできません。
end if

1 hits

▼

【6475】テキストボックス Salem 03/7/3(木) 22:22