文字数と、文字バイト数と取得するには？
解決bell 2000-10-11 03:55:05 No: 103498
始めまして bell と申します。
String型文字列に入っている文字（全角、半角交じり）の
文字数と、文字バイト数を取得したいのですが、
正常に取得できません。
Len関数を使うと、文字数は取得できるのですが、
全角も１文字と数えてしまうため、文字バイト数で
つっかえてしまいます。
文字列"あa"を、下記のように取得する方法はあるのでしょうか？
文字数 ：2
文字バイト数：3
希望：
できれば、１文字毎に２バイト文字か１バイト文字かを
チェックをするのは避けたいのですが・・・。
よろしくお願いいたします。
StrConvでvbFromUnicodeを指定して変換した文字列に
LenBを使ってみて下さい。
bell 2000-10-12 01:53:54 No: 103500
ありがとうございます。
下記のコードにて文字バイト取得に成功しました。
-------------------------------------------
Dim nlen as Long
Dim chkstr as String
chkstr = "あa"
nlen = LenB(StrConv(chkstr, vbFromUnicode))
-------------------------------------------
| ツイート |  |