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

A、 Private Sub Command1_Click()Dim B As BooksOpen "c:/Person.txt" For Output As #1Ｂ.Name=InputBox("输入姓名")Ｂ.TelNum=inputBox("输入电话号码")Write#1, Ｂ.Name, Ｂ.TelNumClose #1End Sub
B、 Private Sub Command1_Click()Dim B As BooksOpen "c:/Person.txt" For Input As #1Ｂ.Name=InputBox("输入姓名")Ｂ.TelNum=InputBox("输入电话号码")Print#1, Ｂ.Name, Ｂ.TelNumClose #1End Sub
C、 Private Sub Command1_Click()Dim B As BooksOpen "c:/Person.txt" For Output As #1Name=InputBox("输入姓名")TelNum=InputBox("输入电话号码")Write #1,BClose #1End Sub
D、 Private Sub Command1_Click()Dim B As BookOpen "c:/Person.txt" For Input As #1Name=InputBox("输入姓名")TelNum=InputBox("输入电话号码")Print #1, Ｂ.Name, Ｂ.TelNumClose #1End Sub

【正确答案】 A

【答案解析】[解析] 要向顺序文件中写入记录必须用ForOutput参数打开文件，然后用Print#或Write#语句将内容写入文件，因此选项B和选项D不正确；又因为自定义数据类型变量的引用要用“变量名，变量元素名”，所以选项C不正确。故本题的正确答案只有选项A。