7,785
社区成员
发帖
与我相关
我的任务
分享如何从文件读取1Byte数据？
我是非计算机专业的，作业是用vb编一个bmp分析程序，读出信息头和图像数据矩阵并作简单的图像处理。
在读矩阵时，老师的方法：
'=============================================
fileput$ = string$(1 ," ")
address = offset '偏移量
for y = 1 to biHeight '图像高度
for x = 1 to biWidth '图像宽度
address = address + 1
get #1，address, fileput$
Matrix(x ,y) = Asc(fileput$) '将数据输入矩阵
next
next
'============================================
老师说，如果要读的信息只有一字节只有用这种方法.但我觉得一定还有更简单的方法。所以来请教大家！
在读矩阵时，老师的方法：
'=============================================
fileput$ = string$(1 ," ")
address = offset '偏移量
for y = 1 to biHeight '图像高度
for x = 1 to biWidth '图像宽度
address = address + 1
get #1，address, fileput$
Matrix(x ,y) = Asc(fileput$) '将数据输入矩阵
next
next
'============================================
老师说，如果要读的信息只有一字节只有用这种方法.但我觉得一定还有更简单的方法。所以来请教大家！
...全文
请发表友善的回复…
发表回复
绿洲 2002-06-20
- 打赏
- 举报
v$ = Input$(1, #1)
不过得确认文件指针位置正确
不过得确认文件指针位置正确
