在窗体上有两个名称分别为 Text1 、 Text2 的文本框,一个名称为 Command1 的命令按钮。 运行后的窗体外观如图所示。 设有如下的类型和变量声明: PrivateType Person name As String*8 major As String*20 EndType Dimp 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