填空题

假设某文件存储的多个用户自定义类型记录，使用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