美国气动隔膜泵:帮我看看这段代码

来源:百度文库 编辑:中科新闻网 时间:2024/05/03 02:44:17
dim Data as string, TData as string, x as long

sub main
open "..." for binary as #1

for x=1 to lof(1)
get 1,x,Data' (or get 1,,Data)
TData=TData & Data
next x

为什么TData = ""
以上代码是在VB中运行的.
作用:以二进制方式读取文件.

请问你的程序是做什么用的也就是说题目是什么