第10讲 文件_1.ppt

第10章 文件 10.1 文件系统控件 10.2 文件基本操作 10.3 文件概述 10.4 顺序文件 10.5 随机文件 10.1 文件系统控件 VB提供的文件系统控件有三种： 驱动器列表框(DriveListBox) 目录列表框(DirListBox) 文件列表框(FileListBox) 利用这3个控件，可以建立Windows中的文件管理器目录窗口界面。 10.1.1 驱动器列表框 1、常用属性 驱动器列表框的基本属性： Name、Left、Top、Height、Width、Visible、Enabled等。 驱动器列表框的特有属性：Drive属性。 用来设置或返回所选择的驱动器名。 格式：[名称.]Drive[=驱动器名] 说明： (1)名称：是驱动器列表框的名称。 (2) “驱动器名” 若省略，则是当前驱动器。 (3)Drive属性只能用程序代码设置。 2、常用事件 驱动器列表框最常用的事件是Change事件。每次重新设置Drive属性，都会引发Change事件。 10.1.2 目录列表框 1、常用属性 目录列表框的基本属性： Name、Left、Top、Height、Width、Visible、Enabled等。 目录列表框的特有属性：Path属性 格式：［对象.］Path［=“路径名”］ 功能：返回当前驱动器的路径。 说明： (1)对象若省略，则为当前窗体。 (2)路径若省略，则显示当前路径。 “路径”的格式：驱动器名:\文件夹名\… 例如： Print Dir1.Path 将显示当前路径(Dir1是目录列表框控件名)。 而 Dir1.Path=“C:\VFP” 将重新设置路径，在目录列表框中显示C盘上VFP目录下的目录结构。Path属性只能在程序代码中设置。 2、常用事件 目录列表框的Path属性值改变时，将引发Change事件。 驱动器列表框和目录列表框 驱动器列表框中的驱动器和目录列表框中的目录必须是同步的。这可通过语句：Dir1.Path = Drive1.Drive 来实现。 例10.1 设计代码，使驱动器列表框和目录列表框同步。 10.1.3 文件列表框 10.1.3 文件列表框 10.1.3 文件列表框 10.1.3 文件列表框 (6)Archive属性 该属性决定是否显示文档文件。 (7)Normal属性 该属性决定是否显示正常标准文件。 (8)Hidden属性 该属性决定是否显示隐含文件。 (9)System属性 该属性决定是否显示系统文件。 (10)ReadOnly属性 该属性决定是否显示只读文件。 例如，如果仅仅显示系统文件，则应设置System属性为True，其他属性设置为False。 10.1.3 文件列表框 【例10.3】驱动器、目录及文件列表框的同步，并在文件列表框中双击某个可执行文件，就能执行该文件。 Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub Private Sub File1_DblClick() x = Shell(File1.FileName, 1) End Sub 10.2 文件基本操作 10.2 文件基本操作 2、删除文件(Kill语句) 格式：Kill 〈文件名〉 功能：用该语句可以删除指定的文件。 说明：“文件名”可以含有路径及通配符。 例如： Kill D:\VB\*.bak Kill语句具有一定的“危险性”，因为在执行该语句时没有任何提示信息。为了安全起见，当在应用程序中使用该语句时，一定要在删除文件前给出适当的提示信息。 10.2 文件基本操作 10.2 文件基本操作 4、创建新的目录(MkDir语句) 格式：MkDir Path 功能：创建一个新的目录。 例如：在D盘上建立一个VB1目录。 MkDir D:\VB1 5、改变当前驱动器(ChDrive语句) 格式：ChDrive Drive 功能：改变当前驱动器。 说明：如果Drive为 ，则当前驱动器将不会改变；如果Drive中有多个字符，则ChDrive只会使用首字母。 例如：将D改为当前驱动器。 ChDrive D 10.2 文件基本操作 6、改变当前目录(ChDir语句) 格式：ChDir Path 功能：改变当前目录。 说明：ChDir语句只能改变缺省目录位置，不会改变缺省驱动器位置。 例如，如果缺省驱动器是C，则下面的语句将会改变驱动器D中VB为缺省目录，但是C仍然是缺省的驱动器。 ChDir D:\VB 7、删除目录(RmD