首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3—131(a)所示。其中“写文件”命令按钮事件过程用来建立一个
在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3—131(a)所示。其中“写文件”命令按钮事件过程用来建立一个
admin
2017-03-27
22
问题
在考生的文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图3—131(a)所示。其中“写文件”命令按钮事件过程用来建立一个通信录,以随机存取方式保存到文件t5.txt中;而“读文件”命令按钮事件过程用来读出文件t5.txt中的每个记录,并在窗体上显示出来。通信录中的每个记录由三个字段组成,结构如下:
姓名(Name) 电话(Tel) 邮政编码(Pos)
LiuMingliang (010)62781234 100082
各字段的类型和长度为:
姓名(Name):字符串15
电话(Tel):字符串15,
邮政编码(Pos):长整型(Long)
程序运行后,如果单击“写文件”命令按钮,则可以随机存取方式打开文件t5.txt,并根据提示向文件中添加记录,每写入一个记录后,都要询问是否再输入新记录,回答“Y”(或“y”)则输入新记录,回答“N”(或“n”)则停止输入;如果单击“读文件”命令按钮,则可以随机存取方式打开文件t5.txt,读出文件中的全部记录,并在窗体上显示出来,如图3—131(b)所示。该程序不完整,请把它补充完整。要求如下:
①去掉程序中的注释符,把程序中的?改为正确内容,使其能正确运行,但不能修改程序中的其他部分。
②文件t5.txt中已有三个记录,如图3—131(b)所示,请运行程序,单击“写文件”命令按钮,向文件t5.txt中添加以下两个记录(全部采用西文方式):
LiDaqing (027)873487654 30065
ChenQjingshan (022)26874321 300120
③运行程后,单击“读文件”命令按钮,在
窗体上显示全部记录(共5个)。
④用原来的文件名保存工程文件和窗体文件。
选项
答案
步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: RecNum=RecNum+1 Put#1,RecNum,Pers Loop While UCase(asp)<>"N" RecNum=LOF(1)/Len(Pers) Get#1,i,Pers 步骤2:按<F5>键运行程序,先单击“写文件”按钮,然后在弹出的输入框中依次按照题目要求输入两条记录,再单击“读文件”按钮在窗体上显示结果。 步骤3:按要求将文件保存至考生文件夹中。
解析
在“写文件”命令按钮的Click事件过程中,用Open语句打开考生文件夹下的文件t5.txt,变最RecNum代表记录个数,在Do…Loop循环中(以输入的不是“N”作为循环条件),用Put语句将记录变量Pers写入随机文件中相应记录号的记录,然后令记录号加1以便下次继续写入。在“读文件”命令按钮的Click事件过程中,用Open语句打开文件t5.txt,同样使用变量RecNum代表记录个数,然后再一个For循环中依次使用Get语句取出每一个记录并且显示。
转载请注明原文地址:https://kaotiyun.com/show/nhGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对窗体编写如下事件过程:PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton
假定有一个菜单项,名为Menultem,为了在运行时使该菜单项失效(变灰),应使用的语句为
要使标签能够显示所需要的文本,则在程序中应设置()属性的值。
如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
执行下面的程序段后,S的值为【】。s=5Fori=2.6To4.9Step0.6s=s+1Nexti
在程序运行时,可以通过______方法来移动滚动条的位置。
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Tex
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$="321":b$="abc"Forj=1To5PrintMid$(a$,6-j,1)+Mid$(b$,
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsIntegerIn=______L
随机试题
《周易·系辞上》里说:“二人同心,其利断金。”这句话给我们的启示是()。
试件经预热后进行插销实验时,要保持载荷()。
霍乱的典型症状之一腹泻是由于上皮细胞中cAMP水平异常升高,Na+大量外流并伴随水分进入肠道。其机制是霍乱毒素将NAD+的ADP核糖基团转移到Gsa的Arg等残基侧链,使Gsa丧失
具有第四氮取代的磺酸酯,例如A与B,对亲核取代反应有额外的高活性。讨论赋予这些物质的活性的因素。
原水经蒸馏、离子交换、反渗透或适宜的方法制备的供药用的水是
下列风险中,属于个别风险的是()。
中国证监会自受理股票发行申请文件到作出决定的期限为()。
根据有关规定,下列选项中,属于中外合资经营企业外方合营者以机器设备出资必须符合的条件有:()。
“贷款五级分类法”,将贷款分为正常、关注、次级、可疑、损失五类,其中前两类称为(),后三类称为不良贷款。不良贷款率是衡量银行资产质量的最重要指标。
幼儿看见同伴欺负别人会生气,看见同伴帮助别人会赞同。这种体验是()。
最新回复
(
0
)