在线等……VB中如何把String转换为Byte数组？？？？快回，马上给分。

[shinyblue]

如题！！！

[脆皮大雪糕]

Dim a As String
Dim b() As Byte
Dim i As Integer
a = "abcd1234"
ReDim b(Len(a) - 1)
For i = 0 To Len(a) - 1
DoEvents
b(i) = Asc(Mid(a, i + 1, 1))
Next

[TechnoFantasy]

Private Sub Command1_Click()
Dim a As String
Dim s() As Byte

a = "abcdefg"
s = StrConv(a, vbFromUnicode)
For i = LBound(s) To UBound(s)
Debug.Print s(i)
Next i
End Sub

[AresChen]

dim a AS string
dim b() as byte
dim v as variant

v=a
b=v
ok!要多去关心一下Variant类型啊，很有用的。顺便说一句，从Byte转回String，也是一样。

[shinyblue]

strconv 是很好的方法，可以解决有中文字符的问题，那谢谢了，不过我该怎么解决VB.NET中的String和Byte数组的互换呢？？？？

还是结了吧