问题
填空题
设在工程中有一个标准模块,其中定义了如下记录类型: Type Books Name As String (10 TelNum As String *20 End Type 在窗体上添加一个名为Command1的命名按钮,要求当执行事件过程Command1 Click时,在顺序文件Person.txt中写入一条记录。请在横线中填入适当的内容,将程序补充完整。 Private Sub Command1_Click() Dim B As ______ Open."c:\Person.txt" For Output As #1 B.Name=InputBox(“输入姓名”) B.TelNum=InputBox(“输入学号”) Write#1, B.Name, B.TelNum Close #1 End Sub
答案
参考答案:Books
解析: 本题先定义一个 Books数据类型,包括两个元素:Name与TelNum。为变量B赋值并写入,首先要定义变量B的数据类型,根据题意,应定义变量B为Books数据,故填 Books。