如果将一个16进制的字符，转为2进制，然后将这个2进制转为字符串？

[DTWUJP]

例如：&h14转为2进制后为00010100,然后将其反转00101000,然后将00101000强制转为字符串.

[DTWUJP]

Dim InputValue As Variant '用来从接收缓冲区读取数据
Dim Buffer(1 To 5) As Byte '字节数据类型数组，用来存储接收到的一组字节数据
Buffer(2) = InputValue(0)'接收第二个字节
这里接收的为什么不是16进制符 14，而是十进制的20，为什么VB给自动转换了

[zfl2k]

你再转回去啊
hex

[weiweiplay]

VB都是显示成10进制的

Private Sub Form_Load()
Dim a As Long
Dim s As String
Dim i As Long

a = &H14

Do While (a Mod &H100) <> 0
For i = 0 To 7
s = s & IIf(a And 2 ^ i, 1, 0)
Next i
a = a \ &H100
Loop

Debug.Print s
End Sub

[weiweiplay]

用 StrReverse(s) 反转字符串

[weiweiplay]

Private Sub Form_Load()
Dim a As Long
Dim s As String
Dim i As Long

a = &H14

Do While (a Mod &H100) <> 0
For i = 0 To 7
s = IIf(a And 2 ^ i, 1, 0) & s
Next i
a = a \ &H100
Loop

Debug.Print s
Debug.Print StrReverse(s)
End Sub