51Testing软件测试论坛

标题: QTP不支持strconv函数，那如何得出我们想要的中英文不同的字节长度呢？ [打印本页]

---

作者: yuco    时间: 2009-5-5 10:03
标题: QTP不支持strconv函数，那如何得出我们想要的中英文不同的字节长度呢？
lenb得到的字节数是unicode的所以中英文都是占2个字节，但是实际测试的时候我们需要的是中文双字节英文单字节的统计方式，怎样才能实现呢?

---

作者: hsjzfling    时间: 2009-5-5 10:31
这问题被问过好几次了

1. Function GetStringLength(str)
   
2.         Dim i,strLength
   
3.         strLength=0
   
4.         For i=1 To Len(str)
   
5.                 If Asc(Mid(str,i,1))>0 Then
   
6.                         strLength=strLength+1
   
7.                 Else
   
8.                         strLength=strLength+2
   
9.                 End If
   
10.         Next
    
11.         GetStringLength=strLength
    
12. End Function

复制代码

---

作者: yuco    时间: 2009-5-5 12:05
谢啦！

---

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)

Powered by Discuz! X3.2