在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观

在窗体上有两个名称分别为Text1、Text2的文本框，一个名称为Command1的命令按钮。运行后的窗体外观如图所示。

设有如下的类型和变量声明：

Private Type Person

name As String*8

mjot As String+20

End Type

Dim P As Person

设文本框中的数据已正确地赋值给Person类型的变量P，当单击“保存”按钮时，能够正确地把变量中的数据写入随机文件Test2．dat中的程序段是

A．Open“c：＼Test2．dat”ForOutputAs#1 Put#1，1，P Close#1

B．Open”c：＼Test2．dat”For Random As#l Get#1，1，P Close#1

C．Open“c：＼Test2．dat”For Random As#1 Len=Len(P) Put#1，1，P C10se#1

D．Open“c：＼Test2．dat”ForRandomAs#l Len=Len(p) Get#1，1，P C10Se#1