酒店套房家具:帮我看看这段代码
来源:百度文库 编辑:查人人中国名人网 时间:2024/10/03 15:41:42
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中运行的.
作用:以二进制方式读取文件.
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中运行的.
作用:以二进制方式读取文件.
请问你的程序是做什么用的也就是说题目是什么