设在工程中有一个标准模块，其中定义了如下记录类型______。 Type Book

问题：

设在工程中有一个标准模块，其中定义了如下记录类型______。 Type BooksName As String*10TelNum As String*20 End Type 在窗体上画一个名为Commandl的命令按钮，要求当执行事件过程Commandl_click时，在顺序文件Person．txt中写入一条记录。下列能够完成该操作的事件过程是______。

A．Ptivate Sub Commandl Click()Dim B As BooksOpen"C:\Persotxt"For Output AS#1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1,Name,TeLNumClodr#1 End Sub

B．Ptivate Sub Commandl_C1iok()Dim B As BooksOpcn"c:\Persotxt"For Input As#1 Name=InputBox("输入姓名") TelNum=InpuBox("输入电话号码") Print#1,Name,TelNumC1ose#1 End Sub

C．Private Sub Commandl Click()Dim B As BooksOpen"c:\Persotxt"For Output As #1 Name=InputBox("输入姓名") TelNum=InputBox("输入电话号码") Write#1、BClose#1 End Sub

D．Private Sub Command1 C1ick() Dim B As BooksOpen"c:\Persotxt"For Input As #1 Name=InputBox('输入姓名') TelNum=InputBox("输入电话号码") Print#1,Name,TelNumClose#1 End Sub