如何测试字符串的长度？
用下面这个函数：
Function CheckStringLength(txt)
    txt=trim(txt)
    x = len(txt)
    y = 0
    for ii = 1 to x
        if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then   
' 如果是中文
            y = y + 2
        else
            y = y + 1
        end if
    next
    CheckStringLength = y

    End Function
字符串长度怎么判断

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。