首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String * 10 Tel As String * 20 End Type Private Sub Command1_Click() Dim p A
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String * 10 Tel As String * 20 End Type Private Sub Command1_Click() Dim p A
admin
2018-07-11
36
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
Type RType
Name As String * 10
Tel As String * 20
End Type
Private Sub Command1_Click()
Dim p As RType
p.Name=InputBox("姓名")
p.Tel=InputBox("电话号")
Open "Books.dat" For Random As #1
Put #1, , 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/87Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
窗体上有一个名称为Text1的文本框,一个名称为Commandl的命令按钮。窗体文件的程序如下:PrivateTvpexPrivateSubCommand1Click()aAsInteg
执行以下程序段a$="VisualBasicProgramming":b$="C++"c$=UCase(Left$(a$,7))&b$&RightS(a$,12)变量c$的值为
下面语句中能够打开随机文件的是
表达式4+5\6*7/8Mod9的值是()。
在数据库系统中,用于对客观世界中复杂事物的结构及它们之间的联系进行描述的是
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
一个兴趣班可以招收多名学生,而一个学生可以参加多个兴趣班。则实体兴趣班和实体学生之间的联系是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是( )。
在利用菜单编辑器设计菜单时,为了把组合键"Alt+X"设置为"退出(X)"菜单项的访问键,可以将该菜单项的标题设置为( )。
随机试题
A.地尔硫卓(硫氮卓酮)B.洋地黄C.胺碘酮D.利多卡因预激综合征合并快速心房颤动
ICSI-I规定的Ret分型不包括
患者,男,63岁。痰多胸闷,心烦口苦,舌苔黄腻脉滑数。治疗应首选
护士查房时观察到某急性胰腺炎患者偶有阵发性的肌肉抽搐,最可能的原因是
若对方对本次交易的行情不了解,则我方可选择()。
财务报表项目的列报应当在各个会计期间保持一致,不得随意变更。()
根据《中华人民共和国海关行政处罚实施细则》规定,不服海关行政处罚的当事人,只能向上一级海关申请行政复议,在对复议决定不服时才能向法院起诉。( )
普通合伙企业的合伙人在合伙协议中未对该合伙企业的利润分配、亏损分担进行约定的,应由合伙人平均分配、分担。()
标准体重的公式是()
设(x)=丨x(1-x)丨,则
最新回复
(
0
)