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

admin2013-04-11  23

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

选项

答案Books

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

最新回复(0)