假定在工程文件中有一个标准模块,其中定义了如下记录类型:Type Books Name As String *10 TelNum As String*20 End Type 要求在执行事件过程Command1_Click时,在顺序文件Person.txt中写入一条记录。将以下程序补充完整。 Private Sub Command1_Click() Dim B As Books open "C=\person.txt" For output As#1 B.Name=InputBox("请输入姓名") B.TelNum=InputBox("请输入电话号码") write #1,______ Close #1 End Sub