![[填空题] 建立随机文件TEST.DAT，存放学生的姓名和总分，然后把该文件中的数据读出来显示。请在 和 处填适当的内容，将程序补充完整，Type RecordStudent As String*](http://www.mshxw.com/aiimages/31/248677.png "[填空题] 建立随机文件TEST.DAT，存放学生的姓名和总分，然后把该文件中的数据读出来显示。请在 和 处填适当的内容，将程序补充完整，Type RecordStudent As String*")
[填空题] 建立随机文件TEST.DAT，存放学生的姓名和总分，然后把该文件中的数据读出来显示。请在 【10】 和 【11】 处填适当的内容，将程序补充完整，
Type Record
Student As String*20
Score As Single
End Type
Dim Class As Record
Open"TEXT.DAT"For 【10】 As #1 Len=Len(Class)
Class.Student=“LiuMin”：Class.Score=596
Put #1，1，Class
Close #1
Open"TEXT.DAT"For Random As #1 Len(Class)
【11】
Print"STUDENT："，Class.Student
Print"SCORE："，Class.Score
Close #1
End
参考答案：
[10] Random [11] Get #1，1，Class问题解析:
对于[10]，首先用Type函数定义一个记录类型数据Record，然后定义Class变量为Record。用Open语句打开随机文件时，For后面应填Random，表示以随机方式打开文件。 [11] 处由于要执行读操作，故使用Get#语句。Get#语句后接三个参数，分别表示文件号、记录号、变量。由于这是与上一步Put#语句相反的操作，故参数都一样，分别为1、 1、Class。故对于[11]处填Get#1，1，Class。
