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

问题单项选择题

假定在工程文件中有一个标准模块，其中定义了如下记录类型Type BooksName As String * 10TelNum As String * 20End Type 要求当执行事件过程Command1_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是：

A．Private Sub Command1_Click() Dim B As BooksOpen "c:\Person.txt" For Output As #1B.Name = InputBox("输入姓名") B.TelNum = InputBox("输入电话号码") Write #1, B.Name, B.TelNumClose #1 End Sub

B．Private Sub Command1_Click() Dim B As BooksOpen "c:\Person.txt" For Input As #1B.Name = InputBox("输入姓名")B.TelNum = InputBox("输入电话号码")Print #1, B.Name, B.TelNumClose #1 End Sub

C．Private Sub Command1_Click() Dim B As BooksOpen "c:\Person.txt" For Output As #1Name = InputBox("输入姓名")TelNum = InputBox("输入电话号码") Write #1, B Close #1 End Sub

D．Private Sub Command1_Click() Dim B As BooksOpen "c:\Person.txt" For Input As #1Name = InputBox("输入姓名")TelNum = InputBox("输入电话号码") Write #1, B.Name, B.TelNumClose #1 End Sub

答案

参考答案：A

解析：A 选项正确。B 选项向文件中输出内容，打开方式应当为 For Output。C 选项记录变量不可以对元素整体输入输出。D 选项记录变量的输入和输出都必须指明到记录元素。格式为：记录变量.元素名。