问题
单项选择题
在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。
设有如下的类型和变量声明：
Private Type Person
name As String*8
major As String*20
End Type
Dim P AS Person
设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2.dat中的程序段是( )
A．Open"c:\Test2.dat"For Output As#1
Put#1,1,P
Close#1
B．Open"c:\Test2.dat"For Random As#1
Get#1,1,P
Close#1
C．Open"c:\Test2.dat"For Random As#1 Len=Len(p)
Put#1,1,P
Close#1
D．Open"c:\Test2.dat”For Random As#1 Len=Len(p)
Get#1,1,P
Close#1
答案
参考答案：C
解析： 随机文件的写操作分为以下4步：
(1)用Type…End语句定义数据类型。
(2)用Open语句以Random方式打开随机文件，其基本格式为：
Open FileName For Random As#FileNumber[Len.记录长度]
(3)用Put#语句将内存中的数据写入磁盘，其格式为
Put#文件号，[记录号]，变量
(4)用Close语句关闭打开的文件。