概述
支持中文的把普通字符串转成二进制字符串的函数
'把普通字符串转成二进制字符串
Function str2bin(varstr)
str2bin=""
For i=1 To Len(varstr)
varchar=mid(varstr,i,1)
varasc = Asc(varchar)
If varasc<0 Then
varasc = varasc + 65535
End If
If varasc>255 Then
varlow = Left(Hex(Asc(varchar)),2)
varhigh = right(Hex(Asc(varchar)),2)
str2bin = str2bin & chrB("&H" & varlow) & chrB("&H" &
varhigh)
Else
str2bin = str2bin & chrB(Asc(varchar))
End If
Next
End Function
来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/10294527/viewspace-124752/，如需转载，请注明出处，否则将追究法律责任。
转载于:http://blog.itpub.net/10294527/viewspace-124752/
最后
以上就是现代外套为你收集整理的支持中文的把普通字符串转成二进制字符串的函数（转）的全部内容，希望文章能够帮你解决支持中文的把普通字符串转成二进制字符串的函数（转）所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复