首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: 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(
admin
2020-07-22
14
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
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全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click() DimxAsInteger,yAsInteger x=InputBox("输入第一个数") y=InputBox("输入第二个数") Callf(x,
编写如下程序:DimnumAsInteger,rAsInteger,nAsInteger,iAsIntegerDimarr(5)AsIntegerPrivateSubCommand1_Click()num=
(1)在考生文件夹中有工程文件sjt3.vbp,其中的窗体如图4所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值"(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Label2中。
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0Printn\10
将数据项“Student”添加到名称为List1的列表框中,并使其成为列表框第一项的语句为()。
下面不属于软件设计阶段任务的是
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
为使文本框具有初始值"VB",在设计阶段正确的操作是
用树形结构表示实体之间联系的模型是
住考生文件夹下的“samp1.accdb”数据库文件中已建立了两个表对象(名为“员工表”和“部门表”)。请按以下要求,完成表的各种操作。(1)将“员上表”的行高设为15。(2)设置表对象“员上表”的年龄字段有效性规则为:大于17且小于6
随机试题
在非水溶剂中滴定弱碱时,常用的溶剂是()。
下列不属于当代综合性TPS的特点的是()
A、方圆型B、卵圆形C、尖圆形D、椭圆形E、混合型切牙联线略为平直,从尖牙的远中才转向后端,这种牙列形态是()
患者,男性,40岁,2周来右侧后牙咬物不适,冷水引起疼痛。近2日来,夜痛影响睡眠,并引起半侧头、面部痛,痛不能定位。检查时见右侧上、下第一磨牙均有咬合面龋洞。根据患者疼痛的性质,患牙最可能诊断是
男,71岁。反复活动时心前区疼痛3个月,5小时前情绪激动时再次发作,持续不缓解,高血压病史10年,查体:BP110/65mmHg,双肺呼吸音清,心率96次/分,律齐,未闻及杂音,血肌钙蛋白升高,心电图V1~V4导联ST段压低0.1mV,T波低平,不适宜的治
100倍散是指
甲公司2010年10月10日向乙公司销售一批商品,含税价款为468万元,销售成本为350万元,截止2010年12月31日尚未收到上述款项,甲公司按其余额的5%计提了坏账准备。2011年2月28日,乙公司以产品质量不符合合同标准为由将上述商品退回。甲公司20
()是国家发展的核心,是提高综合国力的关键所在。
唐代()在《历代名画记》中,第一次从理论上阐述了书画同源的问题。
若想通过以下输入语句使a=5.0,b=4,c=3,则输入数据的形式应该是【】。intb,c;floata;scanf("%f,%d,c=%d",&a,&b,&c)
最新回复
(
0
)