设在工程中有一个标准模块，其中定义了如下记录类型： Type

问题单项选择题

设在工程中有一个标准模块，其中定义了如下记录类型： Type Books Name As String *10 TelNum As String *20 End Type 在窗体上画一个名为Command1的命令按钮，要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是

A．Private Sub Command1_Click() Dim B As Books Open "c：\Persotxt" For Output As #1 Name=InputBox(“输入姓名”) TelNum=InputBox(“输入电话号码”) Write #1,Name,TelNum Close #1 End Sub

B．Private Sub Command1_Click() Dim B As Books Open "c:\Persotxt" For Input As #1 Name=InputBox(“输入姓名”) TelNum=InputBox(“输入电话号码”) Print #1，Name，TelNum Close #1 End Sub

C．Private Sub Command1_Click() Dim B As Books ppen "c：\Persotxt" For Output AS #1 Name=InputBox(“输入姓名”) TelNum=InputBox(“输入电话号码”) Write #1，B Close#1 End Sub

D．Privte Sub Command1_Click() Open "c：\Persotxt" For Input As #1 Name=InputBox(“输入姓名”) TelNum=InputBox(“输入电话号码”) Print#1，Name，TelNum Close #1 End Sub

答案

参考答案：A

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