lenb()怎么没用？

来源：百度知道 编辑：UC知道 时间：2024/06/08 19:44:14
不是每个数字或字母占一个字节，汉字占两个马？
为什么lenb("aa")结果是4？
我要得到我要的上面说的效果，要怎么做？

试试使用API函数：

Private Declare Function lstrlen Lib "kernel32.dll" Alias "lstrlenA" (ByVal lpString As String) As Long

Private Sub Command1_Click(Index As Integer)
Dim a As String
Print Len(a)
Print LenB(a)
Print lstrlen(a)
End Sub

LenB 函数将字符串当作一组字节而不是一组字符。当字符串代表二进制数据时应当使用此函数。如果需要返回字符总数而非字节总数，可使用 Len 函数。