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

A.Private Sub Co mmand1＿Click（）Di m BASBooksOpen ＂Person txt＂For Output As ＃1B .Name ＝InputBox （＂输入姓名＂）B .TelNum＝lnputBox （＂输入电话号码＂）Write ＃1BName ，BTelNumClose ＃1End Sub
B.Private Sub Co mmand1＿Click（）Di m BAs BooksOpen ＂Person txt＂For Input As ＃1B .Name ＝InputBox（＂输入姓名＂）B .TelNum＝InputBox（＂输入电话号码＂）Print ＃1，B．Name ，B．TelNamClose ＃1End Sub
C.Private Sub Co mmand1＿Click（）Di m BASBooksOpen ＂Person txt＂For Output As ＃1B .Name ＝InputBox（＂输入姓名＂）B .TelNum＝InputBox（＂输入电话号码＂）Write ＃1，BClose ＃1End Sub
D.Private Sub Co mmand1＿Click（）Open ＂Person txt＂For Input As ＃1Name ＝lnputBox（＂输入姓名＂）TelNum＝lnputBox（＂输入电话号码＂）Pri m＃1Name TelNumClose ＃1End Sub