单选题窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。设有如下的类型声明：
Type Person
name As String*8
major As String*20
End Type
当单击命令按钮时，将两个文本框中的内容写入一个随机文件Test.dat中。设文本框中的数据已正确地赋值给Person类型的变量p。则能够正确地把数据写入文件的程序段是( )。

A、 Open "c:/Test.dat" For Random As#1
Put #1,1,p
Close #1
B、 Open "c:/Test.dat" For Random As #1
Get#1,1,p
Close #1
C、 Open "c:/Test.dat" For Random As#1 Len=Len(p)
Put #1,1,p
Close #1
D、 Open "c:/Test.dat" For Random As#1 Len=Len(p)
Get #1,1,p
Close #1

【正确答案】 C

【答案解析】[解析] 本题考查随机文件读写。以Random打开随机文件的格式为：Open 文件名 For Random As #文件号[Len=记录长度]，该语句可以进行读写操作，写操作格式为：Put # 文件号，[记录号]，变量名，可以将一个记录变量的内容写到指定的记录位置处，如果忽略记录号，则表示在当前记录后的位置插入一条记录。读操作格式为：Get[#]文件号，[记录号]，变量名，如果忽略记录号，则读出当前记录后而的那一条记录。