ASP获取字符串长度的自定义函数
2012-02-25 13:08
435 查看
ASP获取字符串长度的自定义函数 '----------------------------------------------------------------' ' getStrLen ' 获取字符长度,一个中文字符长度算 2 ' 参数: ' str 需要获取长度的字符串 ' 返回值:整数 (字符串的长度) '----------------------------------------------------------------' Function GetStrLen(str) If IsNull(str) Or str = "" Then getStrLen = 0 Else Dim i, n, k, chrA k = 0 n = Len(str) For i = 1 To n chrA = Mid(str, i, 1) If Asc(chrA) >= 0 And Asc(chrA) <= 255 Then k = k + 1 Else k = k + 2 End If Next getStrLen = k End If End Function
相关文章推荐
- ASP获取字符串长度的自定义函数
- ASP获取字符串长度的自定义函数
- 自定义PHP中获取字符串长度函数
- Lua中获取utf8字符串长度的方法和自定义函数
- asp 获取字符串长度函数
- ASP UTF-8编码下字符串截取和获取长度函数
- Java精确截取字符串/获取字符串前指定长度字符函数
- oracle获取字符串长度函数length()和hengthb()
- PHP生成自定义长度随机字符串的函数分享
- strlen、ord、substr函数——获取长度、ASCII码及部分字符串
- ABAP自定义截取字符串长度函数
- PHP截取字符串,获取长度,获取字符位置的函数
- oracle获取字符串长度函数length()和hengthb()
- Python len() 函数 获取字符串长度
- C++获取字符串长度的几个函数
- php获取字符串长度函数strlen和mb_strlen
- 自定义复制、计算字符串长度函数(…
- ASP自定义函数:对字符串正则替换
- ASP.NET通过自定义函数实现对字符串的大小写切换功能