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