关于VB里面STRCONV函数中lenb和len的问题

Len(string | varname)Len 函数的语法有下面这些部分：部分 说明 string 任何有效的字符串表达式。如果 string 包含 Null，会返回 Null。Varname 任何有效的变量名称。如果 varname 包含 Null，会返回 Null。如果 varname 是 Variant，Len 会视其为 String 并且总是返回其包含的字符数。说明 两个可能...

Len返回的是字符的数目，无论全角还是半角，都算一个字符。LenB返回的是字符所占字节的数目，全角算2个，半角算一个。至于vbfromunicode和vbunicode顺序，那是因为所用字符编码格式不同。

lenB函数是计算字节数的函数如在转换为ansi方式之后 len（"abcd"）=2 lenB（"abcd"）=4 而在unicode方式则 len（"abcd"）=4 lenB（"abcd"）=8 可通过以下代码试试 Private Sub Command1_Click()Dim t, s As String t = "abcd"Print Len(t)Print LenB(t)s = StrConv(t, vbFromUnicode...

Len函数 返回 Long，其中包含字符串内字符的数目，或是存储一变量所需的字节数。LenB 函数作用于字符串中的字节数据 1字符=2字节 为什么会是9 VB中英文的vbUnicode码都是占用2字符，VB就是4 汉字的话，有的是DBCS模式，如“程”占用2字符 有的是SBCS占用1字节，如后面的 所以是9 ...

LEN("A")=1 LEN("啊")=1 lenB("a")=2 lenb("啊") = 2 因为VB默认是用unicode的，VB这么做我个人觉得是没用的，不过VB里这样的没用的函数还有很多，windows现在都是unicode编码了（内核）所以我们无法找到ansi字符集下来验证lenb的执行结果。所以总结一下，现在，在VB里，在XP/WIN7下，lenb...

应该是：strMys3 = StrConv(strMys2, vbUnicode)这样就转换回来了 //转换回来后的Len()输出结果怎么是15，上一步错了自然是步步错，上一步修改正确后再用len就后得到9了吧 之所以会得到15，是因为5个英文字母后面分别多了一个chr(0)，同时第一个汉字被拆成了两截（这个说法其实不准确，只是我...

答案是2,是因为x 是Integer类型,虽然用了n = Str(n),在Str(n)返回了一个字符串" 1234"后,在赋值给n时又被自动类型转换为Integer型。这时用Len()函数去求Integer型n的长度,即是求Integer类型的内存中所占的字节数正是2。

vbNarrow) '更换全角括号为半角Xh: '循环去括号 LenBdsz = Len(LskhStr(0)) i = InStr(LskhStr(0), ")") If i > 0 Then j = InStrRev(Mid(LskhStr(0), 1, i), "(") If j > 0 Then LskhStr(1) = Mid(LskhStr(0), 1, j - 1) LskhStr(2...

Function StrWithChinese(StrChk As String) As Boolean StrChk = VBA.StrConv(StrChk, vbNarrow)'将字符串转换成半角 StrWithChinese = IIf(Len(StrChk) < LenB(StrConv(StrChk, vbFromUnicode)), True, False)'VBA中默认英文字符串都是Unicode，双字节，如果转化为vbFromUnicode就变成单字节，...

Do While LenB(StrConv(StrSaveTmp, vbFromUnicode)) >= LonLtxt * 1000 StrSaveIt = StrConv(MidB(StrConv(StrSaveTmp, vbFromUnicode), 1, LonLtxt * 1000), vbUnicode)call save(strsaveit)StrSaveTmp = StrConv(MidB(StrConv(StrSaveTmp, vbFromUnicode), LonLtxt * 1000, LenB(...