Question

vb怎么用二进制读取图片

Open "D:\My Documents\My Pictures\1.bmp" For Binary As #1
读取这张图片，然后，读取的二进制信息如0001011100等在text1里显示，应该怎么写
，不要乱码那种，要01显示的

Answer 1

vb支持的最低限度为一个字节（八位），如果你想要看二进制信息，可以将其转化为16进制显示，下面是我的代码，给你参考一下：

Dim 文件数据() As Byte, 字符数据() As String
Dim 文件长度 As Long, i As Long
Dim 文件字符串 As String

文件长度 = FileLen(路径(0))
ReDim 文件数据(1 To 文件长度)

Open 路径(0) For Binary As #1
Get #1, , 文件数据
Close #1

ReDim 字符数据(1 To 文件长度)
For i = 1 To 文件长度
字符数据(i) = Hex(文件数据(i))
Next

文件字符串 = Join(字符数据, " ")

Open 路径(1) For Output As #1
Write #1, 文件字符串
Close #1

MsgBox "转换完成"

Answer 2

哥们 把邮箱发我 我发给你最强大的回答，记得多给分哦