Question

VB中如何快速将一组一维数组（Byte 类型）转为字符串

VB中如何快速将一组一维数组（Byte 类型）转为字符串，数组的长度不定的，长度有可能是20，也可能是30…………
忘了补充，需要转为字符的，数组的是为ASCII码，需要转为字符的，H30 的字符就是数字的0，这一种的。

Answer 1

Private Sub Command1_Click()
a = Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
Text1.Text = ""
For i = LBound(a) To UBound(a)
Text1.Text = Text1.Text & a(i) & " "
Next i
End Sub

追问

忘了补充，需要转为字符的，数组的是为ASCII码，需要转为字符的，H30 的字符就是数字的0，这一种的。

追答

已经修改好的，你试一下：
Private Sub Command1_Click()
a = Array(&H31, &H32, &H33, &H34, &H35, &H36, &H37, &H38, &H39, &H30)
Text1.Text = ""
For i = LBound(a) To UBound(a)
Text1.Text = Text1.Text & Chr$(a(i)) & " "
Next i
End Sub