二进制文件读取问题
在VB中,我们可以用下面的方法读取二进制文件:
Dim buffer() As Byte
Dim mlen As Long
mlen = FileLen("c:\10.jpg")
ReDim buffer(mlen - 1)
Open "c:\10.jpg" For Binary As #1
Get #1, , buffer
'读文件:
Get #1, , buffer
Close #1
MsgBox UBound(buffer)
在Robot中编译时产生如图所示:
错误提示,哪位大哥怎么办?
附件: 您所在的用户组无法下载或查看附件