VB中的文件操作是VB的重点以及难点,大家在学习的过程中一定要掌握其访问文件的方式和具体应用。
随机访问模式
该模式要求文件中的每条记录的长度都是相同的,记录与记录之间不需要特殊的分隔符号。只要给出记录号,可以直接访问某一特定记录,其优点是存取速度快,更新容易。
(1)打开与关闭 打开:Open“文件名”ForRandomAs[#]文件号[Len=记录长度] 关闭:Close#文件号
注意:文件以随机方式打开后,可以同时进行写入和读出操作,但需要指明记录的长度,系统默认长度为128个字节。
(2)读与写 读操作:Get[#]文件号,[记录号],变量名
说明:Get命令是从磁盘文件中将一条由记录号指定的记录内容读入记录变量中;记录号是大于1的整数,表示对第几条记录进行操作,如果忽略不写,则表示当前记录的下一条记录。
写操作:Put[#]文件号,[记录号],变量名
说明:Put命令是将一个记录变量的内容,写入所打开的磁盘文件指定的记录位置;记录号是大于1的整数,表示写入的是第几条记录,如果忽略不写,则表示在当前记录后插入一条记录。
二进制访问模式
打开:Open“文件名”ForBinaryAs[#]文件号[Len=记录长度]
关闭:Close#文件号
该模式是最原始的文件类型,直接把二进制码存放在文件中,没有什么格式,以字节数来定位数据,允许程序按所需的任何方式组织和访问数据,也允许对文件中各字节数据进行存取和访问。
该模式与随机模式类似,其读写语句也是Get和Put,区别是二进制模式的访问单位是字节,随机模式的访问单位是记录。在此模式中,可以把文件指针移到文件的任何地方,刚开始打开时,文件指针指向第一个字节,以后随文件处理命令的执行而一旦。文件一旦打开,就可以同时进行读写。
常用的文件操作语句和函数
1.FileCopy语句
格式:FileCopy源文件名目标文件名 功能:复制一个文件 说明:不能复制一个已打开的文件
2.Kill语句
格式:Kill文件名 功能:删除文件 说明:文件名中可以使用通配符*和?
3.Name语句
格式:Name旧文件名新文件名 功能:重新命名一个文件或目录 说明:不能使用通配符;具有移动文件功能;不能对已打开的文件进行重命名操作
4.ChDrive语句
格式:ChDrive驱动器 功能:改变当前驱动器 说明:如果驱动器为空,则不变;如果驱动器中有多个字符,则只会使用首字母
5.MkDir语句
格式:MkDir文件夹名 功能:创建一个新的目录
6.ChDir语句
格式:ChDir文件夹名 功能:改变当前目录 说明:改变默认目录,但不改变默认驱动器。
7.RmDir语句
格式:RmDir文件夹名 功能:删除一个存在的目录 说明:不能删除一个含有文件的目录
8.CurDir()函数
格式:CurDir[(驱动器)] 功能:可以确定任何一个驱动器的当前目录。 说明:括号中的驱动器表示需要确定当前目录的驱动器,如果为空,返回当前驱动器的当前目录路径
例:利用二进制文件读写操作来完成对文件内容的复制。
Private Sub Form_Click()
Dim char As Byte
‘打开源文件
Open App.Path “\genwoxuevb.txt” For Binary As #1
‘打开目标文件
Open App.Path “\genwoxuevbcopy.txt” For Binary As #2
Do While Not EOF(1)
Get #1, , char ‘读取源文件
Put #2, , char ‘将文件内容写入目标文件
Loop
Close
End Sub