首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String*20 End Type Private Sub Command1_Click() Dim p As RType p.N
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String*20 End Type Private Sub Command1_Click() Dim p As RType p.N
admin
2018-06-20
45
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
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/EiGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
三角形的构成条件是:任意2边之和大于第3边。设变量a、b、c是3条直线的长度,要求判断这3条直线能否构成一个三角形。下面有3个程序段可以正确判断,另一个不能正确判断的是
现有如下语句:x=IIf(a>50,Int(a\3),aMod2)当a=52时,x的值是
以下说法中正确的是
(36)窗体上有一个名称为Commandl的命令按钮,其单击事件过程及相关的代码如下:PrivateSubCommandl_Click()DimxAsInteger,yAsInteger
要想使列表框只允许单选列表项,应设置的属性为
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerR
在考生文件夹中有一个工程文件sjt5.vbp,其功能是:找出矩阵元素的最大值,并求出矩阵对角线元素之和,窗体外观如图2-165所示。程序运行时,矩阵数据被放入二维数组a中。当单击”找矩阵元素最大值”按钮时,找出矩阵中最大的数,并显示在标签Label3中。当
以下说法中正确的是
窗体上有一个名称为VScrol11的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
(1)在名称为Form1、标题为“鼠标光标形状”的窗体上添加一个文本框,名称为Text1。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。注意:
随机试题
2012年10月10日,中国政府网公布了《国务院关于第六批取消和调整行政审批项目的决定》。《决定》说,经严格审核论证,国务院决定第六批取消和调整314项行政审批项目。这样,从2002年以来,行政审批制度改革在十年中,分六批共取消和调整2497项行政审批项目
A、可待因B、罗通宁C、哌替啶D、芬太尼E、纳洛酮与吗啡竞争性拮抗同一受体的药物是
与上颌窦关系最密切的是哪一组牙对面容影响最大的是哪一组牙
通常情况下,客户的个人收入支出表分为三栏:收入、支出和结余(或超支)。( )
政府综合统计系统和部门统计系统在组织实施国家统计调查项目、地方统计调查项目和部门统计调查项目过程中,都要严格执行统一的统计标准。()
根据国家统计局数据,2016年末全国民用汽车保有量19440万辆(包括三轮汽车和低速货车881万辆),比上年末增长12.8%,其中私人汽车保有量16559万辆,增长15.0%。民用轿车保有量10876万辆,增长14.4%,其中私人轿车10152万辆
教师选择教育内容的依据是()。
(2012年安徽.材料二)根据下列资料,回答下列问题。2009年全国海洋生产总值31964亿元,比上年增长8.6%。全国海洋生产总值占国内生产总值的9.53%,占沿海地区生产总值的15.5%。海洋第一产业增加值1879亿元,海洋第二产业增加值15
________是可行性研究的依据,是项目建设单位向本单位内的项目主管机构或上级主管部门提交项目申请时所必须的文件。
Infamilieswithtwoworkingparents,fathersmayhavemoreimpact【C1】______achild’slanguagedevelopmentthanmothers,anews
最新回复
(
0
)