100分，我想把“String”类型的字符串转换成“BYTE（）”一维数组，应该怎样实现

Question

string中有没有双字节字符？
比如汉字？

Answer 1

CByte 函数示例
本示例使用 CByte 函数将一表达式转成 Byte。Dim MyDouble, MyByte
MyDouble = 125.5678   ' MyDouble 为Double（双精度）。
MyByte = CByte(MyDouble)   ' MyByte 值为 126

Answer 2

给个例子给你。
Dim s As String
Dim str() As Bytes = "hello world!"
str = StrConv(s, vbFromUnicode)
MsgBox UBound(str)

Answer 3

汉字需要单独考虑了，还有unicode，头大！

Answer 4

Dim ByteArray() as ByteUniCode方式：
ByteArray=String
String=ByteArray
用常用字符串操作函数（Left、Right……）可对ByteArray进行操作ANSI+DBCS方式：
ByteArray=StrConv(String, vbFromUniCode)
String=StrConv(ByteArray, vbUniCode)
用带B的字符串操作函数（LeftB、RightB）可对ByteArray进行操作