假定在工程文件中有一个标准模块，其中定义了如下记录类型 Type Books Name As String*10 TelNum As String*20 End Type 要求当执行事件过程Commandl_Click时，在顺序文件Person.txt中写入一条记录。下列能够完成该操作的事件过程是：
A．Prirate Sub Commandl 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．Pdrate Sub Commandl Cliok() Dim B As Books Open"c:\Persotxt"For Input As #1 Name=InputBox("输入姓名") TeINum=InputBox("输入电话号码") Print #1,Name,TelNum Close #1 End Sub
C．Private Sub Commandl Click() Dim B As Books Open"c:\Persotxt"For Output As #1 Name=InputBox("输入姓名") TelNunl=InputBox("输入电话号码") Write #1,B Close #1 End Sub
D．Private Sub Commandl Click() Dim B As Books Open"c:\Persotxt"For Input As #1 Name=InputBox("输入姓名") Temum=InputBox("输入电话号码") Write #1,Name,TelNuin Close #1 End Sub