设在工程中有一个标准模块,其中定义了如下记录类型: Type Books Name As String (10 TelNum As String *20 End Type 在窗体上添加一个名为Command1的命名

admin2013-04-11  27

问题 设在工程中有一个标准模块,其中定义了如下记录类型:
   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 #1BName=InputBox(“输入姓名”)BTelNum=InputBox(“输入学号”)
     Write#1,BName,BTelNum
     Close #1
   End Sub

选项

答案Books

解析 本题先定义一个 Books数据类型,包括两个元素:Name与TelNum。为变量B赋值并写入,首先要定义变量B的数据类型,根据题意,应定义变量B为Books数据,故填 Books。
转载请注明原文地址:https://kaotiyun.com/show/BoQp777K
0

最新回复(0)