Visual-BASIC程序开发教学课件汇总完整版电子教案全书课件(最新).ppt

10．2 文件操作 ■10.2.2顺序文件 4.顺序文件的读操作 (1)Input #语句 Input #文件号，变量列表 功能：从已打开的顺序文件指针所指的位置起，读出数据项，依次赋值给变量表中的各变量。 (2)Line Input #语句 格式：Line Input #文件号，字符串变量 功能：从顺序文件中读取一个完整的行，并把它赋给一个字符串变量。 (3)Input函数 格式：Input(n，#文件号) 功能：返回从指定的文件中读出n个字符的字符串。 10．2 文件操作 ■例【10-4】： 测试Input语句 Private Sub Form_Click( ) Dim filename As String filename =”c:\testfile.txt” Open filename For Output As #1 Write #1,”One”,”Two”,”Line1” Write #1,”Three”,”Four”,”Line2” Close #1 Dim s1,s2 As String Open filename For Input As #1 Input #1,s1,s2 MsgBox “S1=” s1 “S2=” s2 ‘结果是 “S1=OneS2=Two“ Close #1 Open filename For Input As #1 Line Input #1,s1 MsgBox “S1=” s1 ‘结果是“S1=”One”,”Two”,”Line1”“ Close #1 End Sub 10．2 文件操作 ■例【10-4】： 10．2 文件操作 ■例【10-5】： 使用Input函数 Private Sub Form_Click( ) Dim filename As String filename=”c:\testfile.txt” Open filename For Output As #1 Print #1,”ABC大写字母排排坐” Close #1 Open filename For Input As #1 MsgBox Input(7,1) ‘结果是“ABC大写字母”而不是“ABC大写” Close #1 End Sub 10．2 文件操作 ■10.2.3随机文件 这个类型文件的特点就是每个字段都具有固定的长度，针对这个特征，就可以使用随机存取的文件来保存这些信息。随机存取的文件是由记录构成的，每个随机文件的记录都是由定长的字段构成，所以每个记录的长度也都相同，利用这一点，就可以很方便地找到某个特定记录的某个字段。 “记录”是Visual Basic中的用户自定义的数据类型。在程序中使用记录类型数据时，应先定义一个记录类型，再声明该类型的变量，这样就为这个变量申请了内存空间用于存放随机文件中的记录。 10．2 文件操作 ■10.2.3随机文件 1.记录类型 (1)记录类型的定义格式： Type 记录类型名 数据项名1 As 类型 数据项名2 As 类型 …… End Type 其中，记录类型名是用户自定义类型的名称，数据项名是用户自定义类型中元素的名称，记录类型名和数据项名的命名规则与变量的命名规则相同。 (2)记录类型变量的访问形式为： 记录变量名[(i)].数据项名 其中，若使用(i)，表示访问该记录类型数组的第i个元素。 10．2 文件操作 ■10.2.3随机文件 2.随机文件的打开与关闭 在对一个随机文件操作之前，也必须用Open语句打开文件，随机文件的打开方式必须是Random方式，同时要指明记录的长度。与顺序文件不同的是，随机文件打开后，可同时进行写入与读出操作。 Open语句的格式： Open 文件名 For Random As #文件号 Len=记录长度 因为Random是Open语句缺省的访问类型，所以For Random关键字是可选项。 随机文件的关闭同顺序文件一样，使用Close语句。 10．2 文件操作 ■10.2.3随机文件 3.随机文件的写入操作 向随机文件写数据用Put语句。 格式：Put [#] 文件号，[记录号]，记录变量 说明：“#”、“记录号”是可选的。该语句是将一个记录变量的内容写入所打开的磁盘文件中指定的记录位置处。记录号是1~231-1的整数，表