2. 计算机
  3. 某人编写了向随机文件中写一条记录的程序，代码如下： Type Rtype Name As String*10 Tel As String*20 End Type Private Sub Commandl＿Click(

某人编写了向随机文件中写一条记录的程序，代码如下： Type Rtype Name As String*10 Tel As String*20 End Type Private Sub Commandl＿Click(

admin2020-07-22  36
问题 某人编写了向随机文件中写一条记录的程序，代码如下：
    Type Rtype
    Name As String*10
    Tel As String*20
    End Type
    Private Sub Commandl＿Click()         Dim P As Rtype
         P．Name=InputBox(“姓名”)
         P．Tel=InputBox(”电话号”)
         Open“Books．dat”For Random As#1
         Put＃l，，P
         Close#1
     End Sub
    该程序运行时有错误，修改的方法是(     )。
选项 A、在类型定义“Type RType”之前加不“Private”
B、Dim P As RType必须置于窗体模块的声明部分
C、应把Open语句中的For Random改为For Output
D、Put语句应该写为Put#1。P．Name，P．Tel
答案A
解析 记录类型的定义必须放在模块的声明部分，当在标准模块中定义时，关键字Type前可以有Public(默认)或Private，而如果在窗体模块中定义，则必须在前面加上关键字Private。Open语句中使用For Random表永文件以随机方式存取。Put语句的语法为：Put#文件号，［记录号]，变量。其中“变量”是除对象变量和数组变量外的任何变量。
转载请注明原文地址:https://kaotiyun.com/show/DyHp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)