填空题
建立随机文件TEST.DAT,存放学生的姓名和总分,然后把该文件中的数据读出来显示。请在
__ 1__
和
__ 2__
处填适当的内容,将程序补充完整,
Type Record
Student As String*20
Score As Single
End Type
Dim Class As Record
Open"TEXT.DAT"For
__ 3__
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)
__ 4__
Print"STUDENT:",Class.Student
Print"SCORE:",Class.Score
Close #1
End