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