第十四篇 数据文件.pptVIP

第十四章 数据文件 刘杉 VB文件概念 文件的结构 文件是信息的集合，这些信息又可以直接看成被计算机处理的数据。为便于文件的读写，将相互关联的数据集合到一起作为一条记录。 一个文件由一条或多条记录组成，一条记录又由一个或多个数据项（即字段或域）组成。 文件的分类 按数据的性质，文件分为程序文件和数据文件，程序文件用来存放计算机可执行的程序，包括源文件和可执行文件；按存取方式和结构，文件可分为顺序文件和随机文件； 按数据的编码方式，文件可分为ASCII文件和二进制文件。 按照文件的存取方式和组成，把文件分为以下三类： 1．顺序文件（Sequential File） 结构比较简单，文件中的数据是按顺序组织的文本行，每行即为一个数据记录，每行长度可以变化，行之间以换行符作为分隔符。 2．随机文件（Random Access File） 由一组长度完全相同的记录组成。记录与记录之间不需要分隔符号。一般以二进制形式存放，每个记录包含一个或多个字段。可以按任意次序读写。 3．二进制文件（Binary file） 最原始的文件类型，它直接把二进制码存放在文件中，没有固定的格式。二进制访问模式以字节数来定位数据，允许在程序中按任何方式组织和访问数据，占用空间较小，存取灵活。 文件系统控件 VB6.0提供可直接浏览系统目录结构和文件的3大文件系统控件，即: 驱动器列表框（DriveListBox） 目录列表框（DirListBox） 文件列表框（FileListBox） 文件系统控件 驱动器列表框（DriveListBox ） 目录列表框（DirListBox） 文件列表框（FileListBox） 文件列表框用于将文件定位并列举出来，显示所选择文件类型的文件列表。 文件列表框的FileName属性 用于返回或设置被选定的文件名。该属性在设计时不可用。FileName属性不包括路径名，这一点与通用对话框中的FileName属性不同。 通常可以采用文件列表框的Path属性值和File属性值字符串联接的方法来获取带全路径的文件名。 If Right(File1.Path, 1) = \ Then fname$ = File1.Path file.FileName Else fname$ = File1.Path \ File1.FileName End If 文件列表框的主要事件和发生时机 文件系统控件的联动 3个文件系统控件之间是彼此独立、没有关联的，必须通过编写代码来实现三者之间的联动，即形成一种“驱动器列表框中的当前驱动器改变→触发目录列表框的Change事件→文件列表框目录发生变化”的联系。我们可以将之理解为是一种“树”型的文件定位，即文件列表框中的文件来源于目录列表框中的当前目录，而目录列表框中的目录来源于驱动器列表框中的当前驱动器，形成一种“磁盘→文件夹→文件”的系统结构。 设计一个如图9－1所示的文件浏览程序，要实现以下功能：（1） 3个文件系统控件是同步的，即选择驱动器时，目录列表框中显示当前驱动器下的文件夹，在文件列表框中显示文件夹中的文件。（2）用组合框控件限定文件列表框显示的文件类型。（3）当单击文件名时，用信息框输出文件名。（4）当双击文件列表框中可执行文件名时，将运行该可执行文件。 图9－1文件浏览程序界面 设计思路：在窗体上分别创建驱动器列表框Drive1、目录列表框Dir1、文件列表框File1和用来显示文件类型的组合框Combo1，设置Combo1的Style属性为2。 1.实现驱动器列表框Drive1与目录列表框 Dir1的同步。 Private Sub Drive1_Change ( ) ′当用户选择新的驱动器时触发驱动器列表框Change事件发生 Dir1.Path = Drive1.Drive End Sub Private Sub Dir1_Change()  ‘目录列表框的Path属性改变时触发Change事件发生 File1.Path = Dir1.Path ’文件列表框的路径改变End SubPrivate Sub Form_Load()  ‘组合框的选项在窗体的Load过程中装入  Combo1.AddItem 所有文件(*.*)  Combo1.AddItem 位图文件(*.bmp) Combo1.AddItem 可执行程序文件*.exe) Combo1.AddItem 文本文件(*.txt)End S