[填空题] 假设某文件存储的多个用户自定义类型记录,使用Get语句将数据从文件中读出的所有记录放到某数组中。完成该程序。
定义用户自定义的数据类型:
Type Record
ID As Integer
Name As String * 20
End Type
Sub GetRecord()
Dim MyRecord As Record, Position
Open"TESTFILE"For Random As #1 Len=______
Position=3
Get #1, Position, MyRecord
Close #1
End Sub
参考答案:
Len(MyRecord)问题解析:
解析无

![[填空题] 假设某文件存储的多个用户自定义类型记录,使用Get语句将数据从文件中读出的所有记录放到某数组中。完成该程序。 定义用户自定义的数据类型: Type RecordID As Intege [填空题] 假设某文件存储的多个用户自定义类型记录,使用Get语句将数据从文件中读出的所有记录放到某数组中。完成该程序。 定义用户自定义的数据类型: Type RecordID As Intege](http://www.mshxw.com/aiimages/31/255509.png)
