《第十章vb6.0 文件管理及操作》由会员分享，可在线阅读，更多相关《第十章vb6.0 文件管理及操作（16页珍藏版）》请在金锄头文库上搜索。
1、第十章第十章 文件管理及操作10.1 文件系统的基本操作文件系统的基本操作VB 提供了一些用于处理文件系统的语句，使用这些语句可以在 VB 应用程序中进行更改当前目录、建立或 删除目录、删除文件等基本操作。目录操作目录操作1.获取指定驭动器的当前路径。获取指定驭动器的当前路径。要获取某驱动器的当前路径，可以使用 CurDir 函数，它的语法是：CurDir drive.参数 drive 是指要获取信息的驱动器名称，如果忽略该参数，则 CurDir 函数返回当前驱 动器的当前路径。例如，如果驱动器 E;的当前路径为“E: Too1Qicq”,则如下语句将在窗体上显示“E: Too1Qicq”.P
2、rint CurDir（“E”）。2.更改当前驱动器。更改当前驱动器。使用 ChDrive 语句可以更改当前驱动器，其语法为：ChDrive drive.参数 drive 为要指定为当前驱动器的名称，例如，将驱动器 A:指定为当前驱动器的语句 为：ChDrive “A”.3.更改当前路径。更改当前路径。使用 ChDir 语句可以更改当前路径，其语法为：ChDir Path.参数 Path 为要指定的路径，如果在路径中没有指定驱动器的名称，则表示驱动器为当前 驱动器。例如，将路径 C: Windows 指定为当前路径的语句为：ChDir “C:Windows”. 4.建立与删除目录。建立与删除目
3、录。使用 MkDir 语句可以创建一个新的目录，其语法为：MktDir Path.参数 Path 用来指定所要创建的目录以及目录所在的路径。 Path 可以包含驱动器。如果 没有指定路径，则 MkDir 会在当前路径下创建新的目录。例如：MKDir “C:aa” 在 C 盘中创建目录 aaMKDir “C:Windowsbb” 在 C 盘 windows 目录中创建子目录 bbMKDir “CC” 在当前路径下创建目录 cc使用 RmDir 语句可以删除某一空目录，其语法为：RmDir Path.例如：MKDir “C:aa” 删除 C 盘中目录 aaMKDir “C:Windowsbb” 删
4、除 C 盘 windows 目录中的子目录 bbMKDir “CC” 删除当前路径下创建目录 cc注意：RmDir 语句只能用来删除空的目录，如果目录中还包含有子目录或文件，则必须 先删除子目录和文件。10.1.2 文件操作文件操作文件的操作包括拷贝文件、删除文件、重命名文件和设置文件属性等。在操作文件时，文件必须是关闭的，否则会产生运行错误。下面逐一介绍 VB 中 的各种文件操作语句。1.拷贝文件。拷贝文件。使用 PileCopy 语句可以在磁盘介质间拷贝文件，其语法为：FileCopy Source. Destination.参数 Source 用来指定源文件及其路径。参数 Destina
5、tion 用来指定目标文件及其路径。 如果没有指定路径，则默认路径为当前路径。例如：将 C 盘 Windows 目录中的文件 拷贝到 F 盘，并且文件名变为 FileCopy“C:W,”F:将 C 盘 Windows 目中中的文件 拷贝到当前路径下，且仍使用原名FileCopy “C:,”2.删除文件。删除文件。使用 Kill 语句可以删除磁盘中己存在的文件，其语法为：Kill PathName.参数 PathName 用来指定所要删除的文件及其路径。如果没有指定路径，会删除当前路 径下的文件。Kill 语句支持多字符（*）和单字符（？）等通配符来指定多重文件。例如：Kill “D:vcd
6、mm.dat” 删除 D 盘 Vcd 目录中的 mm.dat 文件Kill “Capter1.doc” 删除当前路径中的 Capter1.doc 文件Kill “E:temp*.txt” 删除 E 盘 Temp 目录中的所有后缀为 TXT 的文件Kill “E:temp*.*” 删除 E 盘 Temp 目录中的所有文件 3.重命名文件。重命名文件。使用 Name 语句可以重命名文件或移动文件，其语法为：Name OldPathName As NewPathName.参数 OldPathname 用来指定所要重命名的文件及其路径，参数 NewPathname 用来指定文 件的新名称及其路径。如果
7、 NewPathName 参数指定的路径与 OldPathName 参数指定的路 径不同，则文件将被移动到新的路径下。例如：将 D 盘中的文件 oicq99b.exe 重命名 oicq.exeName “D:oicc99b.exe” AS “D:ociq.exe”将 D 盘中的文件 oicq99b.exe 移动到 E 盘的 Temp 目录中，并重命名为 oicq.exeName“D:ociq99b.exe” AS “E:Tempoicq.exe”Name 语句对目录也有效，例如：将 D 盘中的 Tocl 目录重命名为 TTName “D:Tool” As “D:TT”将 E 盘的 oicq 目
8、录移动到 D 盘的 Tools 目中Name “E:Oicq” As “D:ToolsOicq” 4.设贵文件的属性。设贵文件的属性。使用 SetAttr 语句可以设置文件或目录的属性，其语法为：SetAttr PathName, VbFileAttribute.参数 Pathname 用来指定所要设置属性的文件或目录，参数 VbFileAtrribute 用来指定文 件或目录的属性，其取值及含义如表 10.1 所示。注意：要删除和设置属性的文件必须是关闭的，否则会产生运行错误。VBFileAttribute 参数的取值也可以是各取值的和，这一点与在前面介绍的通用对话框的 Flags 属性类似
9、。例如：设置 D 盘 Temp 目录中 mytext.txt 文件的属性为只读setAttr“D:Tempmytext.txt”,1设置 D 盘 Temp 目录的属性为隐藏SetAttr “D:Temp”,2设置 E 盘中 yy.jpg 文件的属性为只读和隐藏SetAttr “E:yy.jpg”,3函数 GetAttr 用来返回文件的属性设置，例如，如果 GetAttr（E:yy.jpg）的返回值为 1, 则表明文件 yy:jPg 的属性为只读。如果 GetAttr 函数的返回值为 16,则表明是目录。5.获取文件的大小。获取文件的大小。使用 Filelen 函数可以获取文件的大小，其语法为：
10、Filelen（PathName）参数 PathName 用来指定要获取大小的文件及其路径。函数的返回值为一个长整型值， 代表文件的大小，单位是字节。例如：显示 E 盘中 forml.frm 文件的大小，单位为字节。Print FileLen（“E:form1.frm”） 10.2.1 驱动器列表框驱动器列表框驱动器列表框用来显示当前系统所安装的驱动器，例如，软驱、硬盘的各分区和光驱等。 驱动器列表框是一个下拉式列表框，平时只显示一个驱动器（在默认情况下，显示的是当 前驱动器的名称）。单击列表框右边的向下箭头，就会下拉出一个驱动器列表，列出当前 系统安装的所有驱动器，以供用户选择，如图 10.
11、1 所示。驱动器列表框的最重要的属性是 Drive 该属性用来在运行时设置或返回所选择的驱动器， 在设计时不可用。例如，将如下语句添加到窗体的 Load 事件中，则程序启动后驱动器框中显示的将是指 定的驱动器 E:而不是当前驱动器。Drivel.Drive=“E”在驱动器列表框中选择驱动器并不能自动更该系统的当前驱动器，要使用户在驰动器列 表框中的操作影响到系统，还需要编写一定的代码。改变驱动器列表框的 Drive 属性的设置值会触发它的 Change 事件。因此，在 Change 事 件过程中，可用 ChDrive 语句来更改系统当前驱动器，语句如下：ChDrive Drivel.Drive
12、 10.2.2 目录列表框目录列表框目录列表框用于显示当前驱动器上的目录结构。它以根目录开头，显示的目录按照子目录的层次依次缩进，如图 10.2 所示。双击某一目录，可打开该目录，即显示该目录中的所有子目录。被打开的目录的图标为 一个打开状的文件夹。双击打开的目录可将其关闭，其中的子目录不再显示出来，并且目 录的图标变成一个关闭状的文件夹。目录列表框的最重要的属性是 Path,该属性用来在运行时设置或返回所选择的路径，在设 计时不可用。同样，改变目录列表框的 Path 属性的设置值会触发它的 Change 事件。因此，在 Change 事件过程中，可用 ChDir 语句来更改系统当前路径，语句
13、如下：ChDir Dirl.Path目录列表框只能显示当前驱动器下的目录，如果要显示其他驱动器下的目录结构，则必 须使用 Path 属性来设置它的路径，最佳选择是将目录列表框与驱动器列表框配合使用。实例 10.1 目录列表框与驱动器列表框的配合使用。 在窗体上放置一个驱动器列表框、一个目录列表框、一个标签控件和一个文本框控件。如 图 10.3 所示，其中各对象属性的设置如表 10.2 所示。编写代码如下：Private Sub Drver_Change()Dirl.path=Drivel.driveEnd SubPrivate Sub Dirl_Change()Text1.Text=Dirl.
14、PathEnd Sub运行程序，在驱动器列表框中选择驱动器，则目录列表框中的目录会同步发生相应的改 变；在目录列表框中选择目录，则文本框中会显示出当前所选择的路径，如图 10.4 所示。10.2.3 文件列表框文件列表框文件列表框用来显示当前目录中的文件列表。文件列表框有 4 个重要的属性，下面分别介绍。1.Path 属性。属性。Path 属性用来设置或返回列表框中所显示文件的目录，在设计时不可用。文件列表框常 常与目录列表框和驱动器列表框一起使用。在目录列表框的 Change 事件中添加如下语句：File1.Path=Dirl.Path即可将目录列表框与文件列表框关联起来，当在目录列表框中选
15、择一个目录时，文件列 表框中会自动同步显示出该目录中的所有文件。当文件列表框的 Path 属性改变后，会触发它的 PathChange 事件。2.Patted 属性。属性。Patten 属性用来设置或返回文件列表框中所显示的文件类型，该属性既可以在设计时通 过【属性】窗口设置，也可以在代码中设置。Patters 属性的默认值为*、*,即显示所有文件。 当 Patters 属性改变后，会触发文件列表框的 pattenChange 事件。例如，要使文件列表框中只显示文本文件，则应该将 Patten 属性的值设置为“ *.TXT”,要 设置多个文件类型，可以使用分号（：）来分隔。例如：File1.Pattern=“.DOC” 只显示 word 文档文件File1.Pattern=“*.EXE;*.COM” 显示 EXE 和 COM 文件File1.Pattern=“*BMP;*GIF;*JPG” 显示几种图形文件3. FileName 属性。属性。FileNarne 属性用来设置或返回文件列表框中所选文件的路径和文件名，如果
