首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String * 20 End Type Private Sub Commandl_Click() Di
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String * 20 End Type Private Sub Commandl_Click() Di
admin
2020-07-22
56
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
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#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/IrHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多位整数")
下面列表框属性中,是数组的是( )。
有三个关系R、S和T如下: 则由关系R和S得到关系T的操作是( )。
在设窗体上有一个通用对话框控件CD1,希望在执行下面程序时,打开如图所示的文件对话框:PrivateSubCommand1_Click() CD1.DialogTitle="打开文件" CD1.InitDir="C:" CD1.Fil
以下关于过程及过程参数的叙述中,错误的是
设窗体上有2个文本框Text1和Text2,并有下面的事件过程:DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger) If"A"
结构化程序设汁的基本原则不包括()。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
算法的空间复杂度是指()。
随机试题
论述习近平新时代中国特色社会主义思想的理论特质。
上腹部受强力挤压暴力直接作用于脊柱导致胰腺哪段最易受伤
人工合成的老年痴呆症治疗药物是较少出现中枢副反应的M胆碱受体阻断剂是
在首次公开发行股票的招股说明书中,发行人对所披露的风险必须做定量分析。( )
银行及其他金融机构相互之间进行短期的资金借贷称为()。
自然数N是一个两位数,且为合数,它的个位数字与十位数字都是合数,这样的自然数有()个。
小强今年初三,临近中考,他十分紧张,担心自己考不上重点中学,为此焦虑不安,晚上经常失眠。近日,他的父母发现他有轻微的神经衰弱,为此,找到社会工作者小王。小王接案后,为小强提供了一系列服务,其中最重要的是对小强进行心理辅导和排压训练,让小强增强自信,勇敢面对
()认为迁移产生的关键是学习者在两种活动中通过概括形成了能够泛化的共同原理。
教师比较合理的知识结构应该包括()。
设置当前已选中区域只允许输入200至2000的整数(包括200和2000),并将无效的数据用圈标识出来。
最新回复
(
0
)