二级VB考试系统第6次课文件44学时.pptVIP

笔试作业：VB笔试教程第十一章真题练习和第十二章真题练习。 上机作业：VB上机教程第十一讲文件专题。 9月11日，2学时上机实验 实验内容：VB上机教程P147-真题11.1~11.4，P136真题10.4 课后作业上机练习 * * * * 注意：在上机考试时，文件名部分直接使用例1的形式。 * * * * * * * * Dim a(4, 4) As Integer For i = 0 To 4 For j = 0 To 4 a(i, j) = Rnd * 100 Next j Next i Open in.dat For Output As #1 For i = 0 To 4 For j = 0 To 4 Print #1, a(i, j); Next j Print #1, Next i * Open “out.txt For Input As #1 While Not EOF(1) Input #1, a Wend Close * * * * 建议在VB中演示用户自定义数据类型声明和自定义数据类型变量的使用 * * * * * * * CopyRight@2010 SWPUNCRE All Rights Reserved 2010年9月等级考试辅导 二级Visual Basic 第六讲 文件 随机文件 2 顺序文件 1 文件控件 3 多窗体 4 顺序文件和随机文件 　（1）顺序文件：顺序文件的结构比较简单，文件中的记录一个接一个地存放； 　（2）随机文件：数据采用记录方式组织，可以根据需要直接访问文件中的每个记录。优点是数据的存取较为灵活、方便，速度较快，容易修改；缺点是占空间较大，数据组织较复杂。 顺序文件：文件读/写只能在文件指针所指位置 随机文件：可任意读取或在任意位置写入记录 考点2 文件的操作语句和函数 文件的打开（建立） 　在对文件进行操作之前，必须先打开或建立文件。 1. 语句格式　 例1：Open in5.txt For Input As #1 例2：Open App.Path + \in5.txt For Input As #1 √ Open 文件名 [For模式] As [#]文件号 [Len=记录长度] P154- 考点2 文件的操作语句和函数 Open 文件名 [For模式] As [#]文件号 [Len=记录长度] For Output：顺序文件写 For Input：顺序文件读 Input方式打开，要求被读取文件必须存在 For Append：顺序文件追加方式写 For Random：随机文件读写 考点2 文件的操作语句和函数 文件指针 文件打开后自动生成一个文件指针。 当使用Input、Output、Random等方式打开文件时，文件指针指向文件的开头。 使用Append方式打开文件时，文件指针指向文件的末尾。 完成一次读写操作后，文件指针自动地指向下一次读写操作的位置。 考点2 文件的操作语句和函数 Open 文件名 [For模式] As [#]文件号 [Len=记录长度] 文件号：1~511，在操作时用于指代打开的文件 记录长度：随机文件操作时需指定记录长度 文件大小=所有记录大小之和 考点2 文件的操作语句和函数 文件的关闭 　　文件的读写操作结束后，必须将文件关闭，这一操作将缓冲区的内容写入文件。 语句格式 　 Close[#] 文件号, [#]文件号…… Close 关闭所有已打开的文件 关闭指定编号文件 考点2 文件的操作语句和函数 重要函数 1．LOF(文件号) 返回文件的长度（字节数） 2．EOF(文件号)　 如果当前文件指针指向文件末尾，则返回True，否则返回False 3. Seek #文件号,位置 定位文件指针 考点3 顺序文件 顺序文件的写操作 1．Print #语句 Print #文件号,[[Spc(n)|Tab(n)][表达式表][;|,]] Open “test” For Output As #1 ‘打开文件供输出（写入） Print #1, this is a test ‘输出一行内容 Print #1, ‘输出一个空行 Print #1, hello; ; world Print #1, Spc(5); hello everyone Print #1, Tab(10); hello Close #1 标准输出