第7章 文件系统1.pptVIP

第7章 文件系统;7.1、文件管理控件 ;7.2 文件及其访问方式 ;7.2.1、文件的分类;顺序文件的特点：;随机文件：以随机存取方式存取数据的文件称为随机存取文件，也称直接存取文件，简称随机文件。随机文件由大小相同的数据记录组成。; 随机文件的优点是访问速度快，读、写、修改灵活方便；但由于在每个记录前增加了记录号，从而使文件占用的存储空间增大，数据组织较复杂。 ;3．二进制文件：这种文件中的数据均以二进制的方式存储，存储单位是字节（随机文件按记录存取，顺序文件按行存取）。 在二进制文件中，能够存取任意所需要的字节，可以把文件指针移动到文件中的任何地方，因此，这种存取方式最为灵活。 ;7.2.2、文件操作（读写）的步骤;7.3文件的处理 ;（4）write #文件号“数据列表”：是准备写入到文件中的数据，可以是变量名也可以是常数，数据之间用“，”或“；”隔开。 （5）Close #文件号： 关闭已打开的文件。 【例1】：创建一个新的顺序文为c:\cj.txt Private?Sub?Command1_Click() Open?c:\cj.txt?For?Output?As?#1 Write?#1,?xh,?vb,?vc,?vfp“ Write?#1,?1,?80,?70,?90 Close?#1 End sub 想一下，文件的内容为什么？;向顺序文件添加数据;Private?Sub?Command1_Click() Open?c:\cj.txt?For?Append?As?#1 Write?#1,?20,?60,?70,?80 Close?#1 End sub 想一想，现在文件的内容又是什么？;从已存在的顺序文件中读取数据;Private?Sub?Command1_Click() Open c:\cj.txt For Input As #1 For i = 1 To 3 Input #1, a, b, c, d Print a, b, c, d Next I Close #1 End Sub ;从已存在的顺序文件中读取文本;随机文件;1．用Get语句进行随机文件的读操作。 Get语句格式一般为： Get # 文件号，记录号，变量 Get语句把文件中由记录号指定的记录内容读入到指定的变量中。 例如，Get # 2，3，u 表示将2号文件中的第三条记录读出后存放到变量u中。 2．用Put语句进行随机文件的写操作。 Put # 文件号，记录号，变量 例如，Put # 1，11，t 表示将变量t的内容送到1号文件中的第11号记录去。 ;与文件操作有关的命令与函数;2.与文件操作有关的函数;3. EOF（）函数 返??读文件过程中是否到了文件尾部。当读指针到达文件的尾部时，返回布尔值True，否则返回False。语法如下： EOF（文件号） 在对文件进行读写操作时，经常使用EOF函数来判断是否到达文件的尾部，避免试图在文件结尾处进行输入/出而产生错误。;Private Sub Form_Load（） Dim stu As student Open c:\stu.dat For Random As #1 Len = Len(stu) Title$ = 输入学生记录 For i = 1 To 3 stu.name = InputBox（请输入第 + Str（i） + 个学生的姓名, Title） stu.age = Val（InputBox（请输入第 + Str（i） + 个学生的年龄, Title）） stu.address = InputBox（请输入第 + Str（i） + 个学生的地址, Title） Put #1, i, stu Next i Close #1 End Sub ;7.4 通用对话框 ;常用对话框;常用对话框