如何测试字符串的长度？_编程10000问_

NEWSZW_HZH_BEGIN-->

如何测试字符串的长度？

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

NEWSZW_HZH_END-->

查看更多关于如何测试字符串的长度？_编程10000问_的详细内容...

声明：本文来自网络，不代表【好得很程序员自学网】立场，转载请注明出处：http://haodehen.cn/did27422