假设某文件存储的多个用户自定义类型记录,使用Get语句将数据从文件中读出的所有记录放到某数组中。完成该程序。 定义用户自定义的数据类型: Type RecordID As IntegerName As String * 20 End Type Sub GetRecord()Dim MyRecord As Record, PositionOpen"TESTFILE"For Random As 1 L
主观题
假设某文件存储的多个用户自定义类型记录,使用Get语句将数据从文件中读出的所有记录放到某数组中。完成该程序。 定义用户自定义的数据类型: Type RecordID As IntegerName As String * 20 End Type Sub GetRecord()Dim MyRecord As Record, PositionOpen"TESTFILE"For Random As 1 L