建立随机文件TEST.DAT,存放学生的姓名和总分,然后把该文件中的数据读出来显示。请在【 】和【 】处填适当的内容,将程序补充完整, Type Record Student As String*20 Scor

admin2009-02-13  38

问题 建立随机文件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(Class)
   【  】
   Print"STUDENT:",Class.Student
   Print"SCORE:",Class.Score
   Close #1
   End

选项

答案Random , Get #1,1,Class

解析 对于[10],首先用Type函数定义一个记录类型数据Record,然后定义Class变量为Record。用Open语句打开随机文件时,For后面应填Random,表示以随机方式打开文件。[11] 处由于要执行读操作,故使用Get#语句。Get#语句后接三个参数,分别表示文件号、记录号、变量。由于这是与上一步Put#语句相反的操作,故参数都一样,分别为1、 1、Class。故对于[11]处填Get#1,1,Class。
转载请注明原文地址:https://jikaoti.com/ti/s5q0FFFM
0

最新回复(0)