???关于字符串长度

[mtdata]

dim s1$,s2$,L1%,L2%
s1="你好"
s2="ab"
L1=len(s1)
L2=len(s2)
'L1=2,L2=2
================
有没有办法使得L1=4, L2=2 ???

[mtdata]

各位大虾帮帮忙 :)

[pasl]

Dim s1$, s2$, L1%, L2%
s1 = "你好"
s2 = "ab"
L1 = LenB(StrConv(s1, vbFromUnicode))
L2 = LenB(StrConv(s2, vbFromUnicode))
Me.Print L1, L2

[monglihong]

pasl(阿龙1) 说得对
但可以更简单:
Dim s1$, s2$, L1%, L2%
s1 = "你好"
s2 = "ab"
L1 = LenB(s1)
L2 = Len(s2)

[mtdata]

pasl(阿龙1) : 的方法可行，
lenB我原来也考虑过，不过行不通，vb本身也是unicode方式
strconv也试过，可惜的是没想到把lenb + strconv,

谢谢诸位 :)