首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: 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
47
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
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全国计算机二级
相关试题推荐
要将单选按钮Optl设为被选中,应设置的属性是
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSub
以下程序的功能是随机产生10个两位的整数:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,iAsIntegerR
窗体上建立了一个名为CommonDialongl的通用对话框,用下面的语句建立一个对话框:CommonDialongl.Action=2,则以下语句与之等价的是()。
下面不属于需求分析阶段任务的是()。
假定有以下程序段Fori=lTo3Fori=5To1Step-1Printi*jNextjNexti则语句Printi*j的执行次数是
下面说法中错误的是
若实体A和B是一对一的联系,实体B和C是多对一的联系,则实体A和C的联系是
在E-R图中,用来表示实体联系的图形是( )。
随机试题
按计划的期限分类,中期计划是指期限在一年以内,以年度计划为主要形式的计划。
颅内压增高的“三主征”包括:()
下列哪项是心脏病患者诱发心力衰竭最常见的原因
无菌技术的操作原则,错误的是
为解决超额累进税率计算复杂的问题,累进税率表中一般规定有()。
ABC有限责任公司经批准,由甲公司(合资中方,下同)和乙公司(合资外方,下同)共同出资组建。根据经批准的协议、合同和章程的规定,ABC公司注册资本3000万美元,由出资双方分两期于.1998年6月30日前缴足,其中第一期应于1997年12月31日前缴足。
经过新一轮机构改革后,××市××区政府的主要机构设置如下:区政府办、区发展计划与经济局(企业局、安全监督局)、区教育局、区科技局(科协)、区公安局、区民政局、区司法局、区财政局、区人事局(编办)、区劳动和社会保障局、区国土资源局、区审计局,区统计局、区环境
别人有困难时伸出援助之手,这是一个健康社会应有的公民德性,但一个健康的社会,救助民众困难首先应该是公共救济,完备的社会保障网最大程度地把弱者的生存保障纳入其中______不过再完美的公共救济总会有漏洞,所以需要民间的道德自治,即社会自发的救助机制来消化困境
以下数组定义语句中,错误的是()。
ThreeConceptsinArtHistoryI.Commonalities-Certainchunkof【T1】_____,【T1】______withinwhich【T2】_____wereshared【T2】_____
最新回复
(
0
)