VB程序设计与绘制控件.pptVIP

第12章;12.1 文件的基本概念 ; 顺序文件 普通的纯文本文件。 查找数据必须按记录顺序进行。 不能同时进行读写操作。 随机文件 以固定长度的记录为单位进行存储。 可以按任意顺序访问其中的数据。 可以同时进行读写操作。 不能用字处理软件查看。 二进制文件 以字节为单位进行访问。 不能用字处理软件查看。;12.2 顺序文件;1. 顺序文件的打开 格式: Open 文件名 For [Input|Output|Append] As [#] 文件号 功能: 按指定的方式打开文件，并指定一文件号。 说明： 1）文件名：字符串表达式，可包含驱动器符及文件夹名。;2）打开文件的方式有以下三种： Input：以只读方式打开文件。当文件不存在时出错。 Output：以写方式打开文件。如果文件不存在，就创建一个新的文件；如果文件已经存在，则删除文件中的原有数据，从头开始写入数据。 Append：以添加的方式打开文件。如果文件不存在，就创建一个新的文件；如果文件已经存在，则打开文件并保留原有的数据，写数据时从文件尾开始进行添加。 3）文件号：１～511。#号可以省略。;例: 1）在C盘Data文件夹下建立一个名为stud.dat的文件 Open C:\Data\Stud.dat For Output As #1 2）打开当前盘当前文件夹下的Salary.dat文件，以便从中读取数据 Open Salary.dat For Input As #8 3）打开C盘Data文件夹下名为Stud.dat的文件，以便在文件末尾添加数据 Open C:\Data\Stud.dat For Append As 2;2. 顺序文件的关闭 格式： Close [文件号列表] 说明：“文件号列表”省略时表示关闭所有打开的文件 例: 1）关闭文件号为1的文件 Close #1 2）关闭文件号为1、2、8的文件 Close #1, 2, #8 文件号前的“#”号可以省略 3） 关闭所有打开的文件 Close;1. 顺序文件的写操作 （1） Write #语句 格式: Write #文件号,[输出列表] 功能: 将“输出列表”的内容写入指定的文件中。 例: Write #1, A1, A2, A3 表示：将变量A1,A2,A3的值写入编号为2的顺序文件中。;说明: “输出列表”中各项之间要用逗号分开 “输出列表”每一项可以是常量、变量或表达式 写到文件中的各数据间自动插入逗号，字符串自动加上双引号 所有数据写完后，在最后加入??个回车换行符 不含“输出列表”时，将在文件中写入一空行;【例12-1】建立一个新的学生成绩文件，将输入的学生成绩添加到文件中。;Private Sub Form_Load() CommonDialog1.ShowSave Open CommonDialog1.FileName For Output As #2 End Sub;Private Sub Command1_Click() 添加 no = Text1.Text na = Text2.Text g1 = Val(Text3.Text) g2 = Val(Text4.Text) Write #2, no, na, g1, g2 Text1.Text = : Text2.Text = Text3.Text = : Text4.Text = End Sub;Private Sub Command2_Click() 退出 Close #2 End End Sub;（2）Print #语句 格式:Print #文件号,输出列表 功能:将“输出列表”的内容写入指定文件中 说明: 当“输出列表”用逗号分隔时,采用分区格式输出 当“输出列表”用分号分隔时,采用紧凑格式输出 所有项将在一行内输出，输出后将自动换行 可以使用Spc()函数和Tab()函数 ;用: Write #2, no, na, g1, g2 生成的数据: 01,张三,98,99 02,李四,89,78 03,王五,83,90;用: Print #2, no; na; g1; g2 生成的数据: 01张三 98 99 02李四 89 78 03王五 83 90;2. 顺序文件的读操作 （1） Input #语句 格式: Input #文件号,变量列表 功能: 从文件中读取数据，按顺序给变量列表中的变量赋值。 说明: 常用于读取用Write语句