设在工程中有一个标准模块，其中定义了如下记录类型：Type Books Name As String *10 Te1Num As

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