如何取得中文字符长度(vb)

[liubr]

用Len("中文")得到的结果是2，怎么转换才能得到正确结果4呢？

[batisituta]

For i = 1 To Len(aString)
intScode = Asc(Mid(aString, i, 1))
If intScode >= 0 And intScode < &H100 Then
intByteNum = intByteNum + 1
Else
intByteNum = intByteNum + 2
End If
Next i
Return intByteNum

1.把所有的字符变成ASC码,然后分成英文字母和非英文字母进行比较。
2.如果是英文字母就是1个字节,是中文,一个字符是占两个字节.

[panyee]

//计算字符串实际字节长度
function GetByteLength(str)
{
var iLen = 0;
for(i = 0; i < str.length; i ++)
{
if(str.charCodeAt(i) >= 8481 && str.charCodeAt(i) <= 63486)
iLen += 2;
else
iLen += 1;
}
return iLen;
}

[cyp503]

int len=System.Text.Encoding.Default.GetByteCount(YourString);

[liubr]

试过了都可以，第2种方法是客户端脚本，第3个是我最想要的答案，够简单。