第7章 文件剖释.docVIP

为了保存应用程序的数据，需要将数据以文件的形式存储在磁盘中，这一过程涉及VB的文件操作和管理。文件操作包括两类： ① 文件复制、移动 ② 打开文件进行显示、编辑、修改和重新保存 7.1 文件管理控件 对打开文件进行显示、编辑、修改和重新保存的操作，VB提供了3种管理控件( 驱动器列表框、 目录列表框和 文件列表框),用于建立文件管理器界面。 7.1.1驱动器列表框(DriveListBox) 驱动器列表框是一种下拉式列表框，默认状态下只显示当前驱动器名，单击其右边的箭头，就会拉出列表框中所有磁盘驱动器。 1．常用属性 Name：控件名，通常采用Drv作前缀 Drive：只能在程序被引用或设置，在运行时返回或设置所选定的驱动器，也可用赋值语句指定当前的驱动器。 格式：对象.Drive=Drive 例：Drive1.Drive=D: 2．常用事件 Chang：在列表框中选择新的驱动器后触发 3．ChDrive语句 功能：改变当前工作驱动器 格式：ChDrive Drive 说明：仅改变当前工作驱动器，不改变Drive属性，不触发Chang事件。 例：ChDrive D: 7.1.2 目录列表框(DirListBox) 显示当前驱动器的目录及所有子目录，供用户选择其中某个目录作为当前目录。 1．常用属性 Name：控件名，通常采用Dir作为前缀 Path：用来设置或返回目录列表框的当前目录，只在程序被引用或设置。 格式1：目录列表框.Path=路径 格式2：目录列表框.Path=驱动器列表框.Drive 例: Dir1.Path =C:\DOS 注意：Path 值的改变将产生Change 事件 例：当驱动器列表框DRIVE1中选中的的驱动器变化时目录列表框DIR1中的目录列表也随之变化，并在文本框TEX1中显示出路径。 Private Sub Drive1_Change() Dir1.Path = Drive1.Drive Text1 = Dir1.Path End Sub 2．常用事件 Chang：双击目录列表框中的目录项后或在代码中用赋值语句改变Path属性触发 3．ChDir语句 功能：改变当前工作目录 格式：ChDir Path 说明：仅改变当前工作目录，不改变Drive属性。 例：ChDrive D: 7.1.3 文件列表框(列表框) 用于显示当前盘符、路径下的文件目录清单。 1．常用属性 Name：控件名，通常采用File作为前缀 Path：设置或返回文件列表框中所显示文件路径，或用赋值语句进行属性设置。 格式1：文件列表框.Path=路径 格式2：文件列表框.Path=目录列表框.Path 例：当改变所选择目录列表框的目录时，引发Change事件发生。导至文件列表框中显示的文件随之变化。 Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Pattern：返回或设置文件列表框所显示的文件类型，该属性为具有通配符的文件名字符串。 缺省值为*·*，多种类型间用分号(;)分隔。该属性即可在设计时设置，也可在程序运行时设置。当Pattern属性发生变化时，将产生PatternChange事件。 格式：[窗体.]文件列表框 Pattern=属性值[；属性值…] 例：File1. Pattern=*.exe；*.fem 说明：Pattern 属性的值的改变将产生一个 Pattern Change 事件。 FileName：返回或设置被选定文件的文件名和路径，且产生PathChange事件。 格式：[窗体名]文件列表框. FileName=指定文件名及其路径的字符串 例：File1.FileName=D:\*.exe 说明：如果要实现在文件列表框中双击某个可执行文件就能执行该可执行文件，则必须要有如下过程。 SUB 文件列表框对象名_DBLCLICK() RETVAL= SHELL(文件列表框名.FileName,1) END SUB ListCount：用于组合框和列表框，返回控件内所列项目的总数。 格式：对象.ListCount ListIndex：用于组合框和列表框，返回或设置当前控件上所选项目的索引值。 格式：对象.ListIndex=索引值 说明：Path 、FileName、ListCount、ListIndex属性只在程序被引用或设置 2．常用事件： PathChange：文件列表框的Path属性改变时触发 例：File1.Path=Drive1.Drive 或File1.Path=Dir1.Path ； File1. FileName=c:\config.sys PattemC