设在工程中有一个标准模块,其中定义了如下记录类型:Type Books Name As String *10 Te1Num As

设在工程中有一个标准模块，其中定义了如下记录类型：Type Books Name As String *10 Te1Num As String *20End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是。A．Private Sub Command1_Click() Dim B As Books Open"c":\Person.txt"For Output As #1 B.Name=InputBox（"输入姓名"） B.Te1Num=InputBox（"输入电话号码"） Write #1,B.Name,B.Te1Num Close #1 End SubB．Private Sub Command1_Click() Dim B As Books Open"c":\Person.txt"For Input As #1 B.Name=InputBox（"输入姓名"） B.Te1Num=InputBox（"输入电话号码"） Prite #1,B.Name,B.Te1Num Close #1 End SubC．Private Sub Command1_Click() Dim B As Books Open"c":\Person.txt"For Output As #1 B.Name=InputBox（"输入姓名"） B.Te1Num=InputBox（"输入电话号码"） Write #1,B Close #1 End SubD．Private Sub Command1_Click() Open"c":\Person.txt"For Input As #1 Name=InputBox（"输入姓名"） Te1Num=InputBox（"输入电话号码"） Prite #1,Name,Te1Num Close #1 End Sub

A【解析】本题考查文件的打开与顺序文件中写入记录的操作。由于要写入，故顺序文件的打开方式应为Output，所以B、D项错误。同时用“Write #”语句写入时，要指明写入的变量名，对于记录类型的变量，要分别写出元素，所以C项也是错误的，正确答案为A。