Basi程序设计 第12章文件处理 程序设计 万博科技职业学院
Visual BASIC 程 序 设 计 Visual Basic 程序设计 第12章文件处理 万博科技职业学院
博科:技院 主要内容 ■文件系统控件 Hmc 今驱动器列表框 Drivelist Box 目录列表框 DirlistBox 文件列表框 FilelistBox OHO ■文件处理语句 ■文件系统对象 Filesystemobject(FSO) ■传统的文件I/O语句 程序设计 Open、Cose ☆ Input、 Write Line Input、 Print ☆Get、Put
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 主要内容 ◼ 文件系统控件 ❖驱动器列表框 DriveListBox ❖目录列表框 DirListBox ❖文件列表框 FileListBox ◼ 文件处理语句 ◼ 文件系统对象 FileSystemObject (FSO) ◼ 传统的文件I/O语句 ❖Open、Close ❖Input、Write ❖Line Input、 Print ❖Get、Put
博科:技院 文件糸统控件 ■ DrivelistBox(驱动器列表框)主要属性:P 令 Drive驱动器名 ■ DirlistBox一目录列表框 OHO Path选中的目录(路径) ■ FilelistBox-文件列表框 ☆Path显示的目录 程序设计 ◇ Filename最后选中的文件名 ☆ Pattern样式(类似于过滤器 Filter) 都有类似 stbox的属性如List, listcount等
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 文件系统控件 ◼ DriveListBox（驱动器列表框）主要属性： ❖ Drive 驱动器名 ◼ DirListBox－目录列表框 ❖ Path 选中的目录（路径） ◼ FileListBox－文件列表框 ❖ Path 显示的目录 ❖ Filename 最后选中的文件名 ❖ Pattern 样式（类似于过滤器 Filter） ◼ 都有类似listbox的属性如List ，listcount等
博科:技院 三种列表框的同步 Hmc 选择驱动器时,目录列表框跟着改变 Private Sub Drivel_Changeo Dir 1, Path Drive1, Drive OHO End sub 选择目录时,文件列表框跟着改变 Private Sub Dir1_Changeo 程序设计 File 1, Path Dir 1, path End sub 心□
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 三种列表框的同步 '选择驱动器时，目录列表框跟着改变 Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub '选择目录时，文件列表框跟着改变 Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub
博科:技院 常用的文件处理语句 Hmc ■ ChDrive改变当前驱动器 ■ChDi改变当前路径 ■MkD创建新目录 OHO RmDi删除目录 ■K删除文件 ■ Setatt,设置文件属性 程序设计 ■ File Copy拷贝文件 ■NameAs更名
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 常用的文件处理语句 ◼ ChDrive 改变当前驱动器 ◼ ChDir 改变当前路径 ◼ MkDir 创建新目录 ◼ RmDir 删除目录 ◼ Kill 删除文件 ◼ SetAttr , 设置文件属性 ◼ FileCopy 拷贝文件 ◼ Name As 更名
博科:技院 文件糸统对象 Hmc 把驱动器、文件夹、文件等都看作对象: ■ File Systemobject(FSO)文件系统 Drive/ Drives驱动器/驱动器集合 OHO Fode/ Folders文件夹/文件夹集合 ■File/Fls文件/文件集合 程序设计 ■ Textstream文本流
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 文件系统对象 把驱动器、文件夹、文件等都看作对象： ◼ FileSystemObject (FSO) 文件系统 ◼ Drive/Drives 驱动器/驱动器集合 ◼ Folder/Folders 文件夹/文件夹集合 ◼ File/Files 文件/文件集合 ◼ TextStream 文本流
博科:技院 文件糸统对象操作 Hmc ■引用 Microsoft Scripting Runtime ■创建FSO对象。两种方法: 令Dm as New Filesystemobject . Dim fs as new File systemobject OHO 令Se= Createobject(“ Scripting. FileSystemobject) 4 Set fs =Createobject( Scripting Filesystemobject) F ■使用FSO访问驱动器、文件夹和文件。例如设 8 Dim fs as New Filesystemobject 8 Dim fi as file ☆ set fil= fs. getfile(“C: config.Sys")
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 文件系统对象操作 ◼ 引用 Microsoft Scripting Runtime ◼ 创建FSO对象。两种方法： ❖ Dim as New FileSystemObject ❖ Dim fs as New FileSystemObject ❖ Set =CreateObject(“ Scripting.FileSystemObject”) ❖ Set fs =CreateObject(“ Scripting.FileSystemObject”) ◼ 使用FSO访问驱动器、文件夹和文件。例如 ❖ Dim fs as New FileSystemObject ❖ Dim fil as File ❖ set fil=fs.getfile(“c:\config.sys”)
博科:技院 传统的文件读写 Hmc ■文件操作: 传统的文件I/O语句 打开文件 ☆Open、 Close ☆读写文件 ☆ Input、 Write 关闭文件 ☆ Line Input、 Print OHO ■数据文件访问类型 ☆Get、Put 顺序型 ■对不同类型文件用不 ☆随机型 同的语句 程序设计 今二进制型 有关函数
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 传统的文件读写 ◼ 文件操作: ❖打开文件 ❖读写文件 ❖关闭文件 ◼ 数据文件访问类型 ❖顺序型 ❖随机型 ❖二进制型 ◼ 传统的文件I/O语句 ❖Open、Close ❖Input、Write ❖Line Input、 Print ❖Get、Put ◼ 对不同类型文件用不 同的语句 ◼ 有关函数
博科:技院 顺序文件的打开 Hmc 语句格式 openFor{ Input| Output Append}As[Len= buffersize] 说明 OHO Input一为读取文件而打开,文件应存在 Output一为写入数据而打开,新建 Append一为追加数据而打开,也可新建 文件号:读写和关闭时用。同时打开多个文件时计 要指定不同的文件号。 ■例:Open“c:labt" for Input as#1
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 顺序文件的打开 ◼ 语句格式: Open For {Input | Output | Append} As [Len=buffersize] 说明: Input －为读取文件而打开，文件应存在 Output－为写入数据而打开，新建 Append－为追加数据而打开，也可新建 ◼ 文件号：读写和关闭时用。同时打开多个文件时 要指定不同的文件号。 ◼ 例：Open “c:\a.txt” for Input as #1
博科:技院 顺序文件的读取 Hmc 句格式: ◇读1行到一个变量: Line Input#, OHO 用下列函数读指定长度: Input(,) Input(,) 程序设计 读一列数据到一列变量: Input#
■ Visual BASIC 程 序 设 计 万 博 科 技 职 业 学 院 Wanbo Inst. Of Since & Tech. 顺序文件的读取 语句格式： ❖ 读1行到一个变量： Line Input #， ❖ 用下列函数读指定长度： Input (,) InputB(,) ❖ 读一列数据到一列变量： Input # , ,,…