我是靠谱客的博主 还单身春天,这篇文章主要介绍如何测试字符串的长度?,现在分享给大家,希望可以做个参考。

如何测试字符串的长度?

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

最后

以上就是还单身春天最近收集整理的关于如何测试字符串的长度?的全部内容,更多相关如何测试字符串内容请搜索靠谱客的其他文章。

本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
点赞(187)

评论列表共有 0 条评论

立即
投稿
返回
顶部