<<< 返回 access911.net 编程静态资料库索引页

如何得到字串的真实长度,中文算2个字符,英文算1个

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2005-4-8  浏览人次:1371


专题地址:http://access911.net/fixhtm/72FAB01E17DCE8F3.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:如何得到字串的真实长度,中文算2个字符,英文算1个《VBA》

 


问题:

如何得到字串的真实长度,中文算2个字符,英文算1个《VBA》

 

方法一:


'返回值为19,正确
Debug.Print LenB(StrConv("access911.net网站。", vbFromUnicode))


 


方法二:

你可以尝试用 ASC 去判断,如果是 0-255 则表明是英文,算一个,大于,小于部分都算2个

Function TrueLen(ByVal strA As String) As Long
    Dim i As Long
    Dim i1 As Long
    Dim strB As String
    For i = 1 To Len(strA)
.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FAB01E17DCE8F3.htm

 


上一篇:如何确定某年第N周的第一天日期?

下一篇:个性化的access911.net(五)繁体中文版、超快速静态页面

2017年2月22日生成静态资料