问题：[选择题]

[单项选择题] 设在工程中有一个标准模块，其中定义了如下记录类型：TyPe Record ID A3 IntegerName As String*20 End TyPe 在窗体中添加一个名为Command1的命令按钮，假设d：F1.dat文件中含有5个用户自定义类型的记录。要求当执行事件过程Command1_Click时，随机访问该文件，并把文件中的第4条记录读出。下列能够完成该操作的程序段是

A．PrivateSubCommand1_Click()DimMyRecordAsRecord，PositionOpen"d：F1.dat"ForRandomAs#1Len=Len(MyRecorPosition=4Get#1，Position，MyrecordClose#1EndSub
B．PrivateSubCommand1_Click()DimMyRecordAsRecord，PositionOpen"d：F1.dat"ForRandomAs#1Len=Len(MyRecorPosition=4Put#1，Position，MyRecordClose#1EndSub
C．PrivateSubCommand1_Click()DimMyRecordAsRecord，PositionOpen"d：F1.dar"ForOutPutAs#1Len=Len(MyRecorPosition=4Get#1，Position，MyRecordClose#1EndSub
D．PrivateSubCommand1_Click()DimMyRecordAsrecord，PositionOpen"d：F1.dat"ForlnputAs#1Len=Len(MyRecorPosition=4Get#1，Position，MyRecordClose#1EndSub