vb定义字符串数组 VB字符串和字节数组的转换?
VB字符串和字节数组的转换?
Dimsasstring,a()asbyte,s1asstrings=“123456abcdef”a=strconv(s,vbfromunicode)“string to byte array S1=strconv(a,vbunicode)”byte array to string msgboxs1
VB string在转换到系统的默认代码页后,可以使用strconv函数从Unicode转换为系统的十六进制字符每个字节都被获取并拼接在一起。strconv函数返回由指定类型转换的变量(字符串)。实现代码:private sub command1uclick()dim strsj as StringDim strhexsj as StringDim I as longdim bytsj()as bytestrsj=“123abc hex”bytsj=strconv(strsj,vbfromunicode)for I=0 to UBound(bytsj)strhexsj=strhexsj&;right(“0”&hex(bytsj(I)),2)下一个debug.PrintStrhexsjend sub
作为字符串的dim s=“123456”“get array Dim b as byte()=编码.ASCII.GetBytes(s) “为B中的每个V显示dim V as Byt调试.打印(v) 下一步
~]“获取数组
将b变为字节()=编码.ASCII.GetBytes(s)
显示
将V变为字节
对于B中的每个V调试.打印(v)
下一个
vb定义字符串数组 excel数字转字符串 java字符串转数组
版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。