首页 / 正则表达式 / vbs:一段比较精简的代码实现取得字符串的"字节"数

大家都知道汉字占用两个英文字母的长度，所以索取时要将其转换为长度２，这个例子比较简单的实现了这一功能 
<script language=vbs>function find1（findstr）set rep1=new regexprep1.Global=truerep1.IgnoreCase=truerep1.Pattern="[u4E00-u9FA5]"set str1=rep1.Execute（findstr）for each i in str1lens=lens+1nextlens=lens + len（findstr）msgbox "字符长度 : " & lensend functionfind1（"1234567"）find1（"大家好1234567"）</script>
[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]