网络编程 
首页 > 网络编程 > 浏览文章

如何测试字符串的长度?

(编辑:jimmy 日期: 2024/11/25 浏览:3 次 )

如何测试字符串的长度?

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

上一篇:如何验证字符串是否包含有效字符?
下一篇:如何制作关联的下拉菜单?
友情链接:杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网 网站地图 SiteMap