VB读写文件要用到以下语句：r
1、Ope
语句打开文件。r
2、读文件使用Li
eI
put、I
put，（以上为文本方式）和Get（以上为二进制方式）。r
3、写文件使用Pri
t、Write（以上为文本方式）和Put（以上为二进制方式）。r
4、Close语句关闭文件r
5、二进制方式下移动文件位置使用Seek语句。r
所有这些语句在VB的帮助中都有详细说明和例子。r
文本文件的示例：r
Ope
quotTESTFILEquotForOutputAs139打开输出文件。r
Pri
t1quotThisisatestquot39将文本数据写入文件。r
Pri
t139将空白行写入文件。r
Pri
t1quotZo
e1quot；Tab；quotZo
e2quot39数据写入两个区（pri
tzo
es）。r
Pri
t1quotHelloquot；quotquot；quotWorldquot39以空格隔开两个字符串。r
Pri
t1Spc5；quot5leadi
gspacesquot39在字符串之前写入五个空格。r
r
Pri
t1Tab10；quotHelloquot39将数据写在第十列。r
r
39赋值Boolea
、Date、Null及Error等。r
DimMyBoolMyDateMyNullMyErrorr
MyBoolFalseMyDateFebruary121969MyNullNullr
MyErrorCVErr32767r
39True、False、Null及Error会根据系统的地区设置自动转换格式。r
39日期将以标准的短式日期的格式显示。r
Pri
t1MyBool；quotisaBoolea
valuequotr
r
Pri
t1MyDate；quotisadatequotr
Pri
t1MyNull；quotisa
ullvaluequotr
Pri
t1MyError；quotisa
errorvaluequotr
Close139关闭文件。r
r
读文件示例r
使用Li
eI
put语句从顺序文件中读入一行数据，并将该行数据赋予一个变量。本示例假设TESTFILE文件内含数行文本数据。r
DimTextLi
er
Ope
quotTESTFILEquotForI
putAs139打开文件。r
DoWhileNotEOF139循环至文件尾。r
Li
eI
put1TextLi
e39读入一行数据并将其赋予某变量。r
DebugPri
tTextLi
e39在调试窗口中显示数据。r
Loopr
Close139关闭文件。r
你也可以在我们的“磁盘、文件和目录”栏目中找到许多这方面的问题和例子。r
r
Get和Put语句也可以读写多个字节，可以把每次读写的内容放在一个字节变量数组中，以提高程序速度。例如：r
　　DimDSXAsByte39为字节数组，用来存储读写内容r
　　DimReadFileNoWriteFileNoAsI
tegerr
　　39读写文件号r
　　Co
stU
it100000　39读写块的大小r
　　Ope
SourceFileNameForBi
aryAccessReadAs1r
　　WriteFileNoFreeFiler
　　Ope
TargetFileNameForBi
aryAccessWriteAsWriteFileNor
　　ReDimDSXU
itAsByte　39设置存储字节数组的大小r
　　GetReadFileNo100DSXr
　　PutWriteFileNo1DSXr
　　CloseWriteFileNoReadFileNor
r
Ope
quottesttxtquotForOutputAs1r
Data1Recordsetr