转化为二进制
将“a7 "转化为二进制的函数是哪个？
[解决办法]
用&HA7表示，例：
Dim a As Byte
a = &HA7
Text1 = a
在Text1文本框内可看到 167
在内存中a是Byte数据类型的二进制数。
[解决办法]
Private Sub Command1_Click()
Dim i As Integer, j As Integer, temp As String
j = Val(Text1.Text)
i = 256
Do
i = i / 2
temp = temp & IIf((i And j) <> 0, 1, 0)
Loop Until i = 1
Text2.Text = temp
End Sub
