关于 strconv 转换问题 ？？？？？？？？？？？？？

[wzxiaodu]

Dim A(3) As Byte, s1 As String, s2 As String
A(0) = &HAA
A(1) = &HBE
A(2) = &HB9
A(3) = &H44
s1 = StrConv(a, vbUnicode, &H404)
Debug.Print s1

结果：s1="知道"

但我不知道，如何从 s1 转换到 A ？

请各位高手帮助我。。。。。。。。。。。。。。

[wzxiaodu]

谁能告诉我，谢谢了。。。。。。。。。。。。。。。

[northwolves]

Private Sub Command1_Click()
Dim a() As Byte, s1 As String, i As Integer
s1 = "知道"
a = StrConv(s1, vbFromUnicode, &H404)
For i = 0 To UBound(a)
Debug.Print "A(" & i & ")=&H" & Hex(a(i))
Next
End Sub

[ZOU_SEAFARER]

a = StrConv(s1, vbFromUnicode, &H404)
反着用就好了