首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生的文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图2.77(a)所示。其中“写文件”命令按钮事件过程用来建立一个通
在考生的文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图2.77(a)所示。其中“写文件”命令按钮事件过程用来建立一个通
admin
2016-12-29
20
问题
在考生的文件夹下有一个工程文件sit5.vbp,相应的窗体文件为sjt5.frm。在窗体上有两个命令按钮,其名称分别为Command1和Command2,标题分别为“写文件”和“读文件”,如图2.77(a)所示。其中“写文件”命令按钮事件过程用来建立一个通信录,以随机存取方式保存到文件t5.txt中;而“读文件”命令按钮事件过程用来读出文件t5.txt中的每个记录,并在窗体上显示出来。通信录中的每个记录由三个字段组成,结构如下:
姓名(Name) 电话(Tel) 邮政编码(Pos)
LiuMingliang(0 1 0)6278 1234 1 00082
各字段的类型和长度为:
姓名(Name):字符串15
电话(Tel):字符串15
邮政编码(Pos):长整型(L0ng)
程序运行后,如果单击“写文件”命令按钮,则
可以随机存取方式打开文件t5.txt,并根据提示向文件中添加记录,每写入一个记录后,都要询问是否冉输入新记录,同答“Y”(或“y”)则输入新记录,回答“N”(或“n”)则停止输入:如果单击“读文件”命令按钮,则可以随机存取方式打开文件t5.txt,读出文件中的全部记录,并在窗体上显示出来,如图2.77(b)所示。该程序不完整,请把它补充完整。要求如下:
①去掉程序中的沣释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。
②文件t5.txt中已有三个记录,如图2.77(b)所示,请运行程序,单击“写义件”命令按钮,向文件t5.txt中添加以下曲个记录(仝部采用两文方式):
LiDaqing(0271873487654 30065
ChenOingshan(022)26874321 3001 20
③运行程后,单击“读文件”命令按钮,在窗体上显示全部记录(共5个)。
④用原来的文件名保存工程文件和窗体文件。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: RecNum=RecNum+1 Put#1,RecNum,Pers Loop While UCase(asp) <>”N” RecNum=LOE(1) / Len(Pers) Get#1, i, Pers 步骤2:按
键运行程序,先单击“写文件”按钮,然后往弹出的输入框中依次按照题目要求输入两条记录,再单击“读文件”按钮在窗体上显示结果。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/v9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有从左到右4个单选按钮组成的控件数组Optl,下标从0开始。程序运行时,单击命令按钮“选择”(名称为Commandl),则在标签Labell中显示所选中的信息,如图所示。以下是完成上述功能的程序,请填空。PrivateSubCommandl
窗体上有一个名称为Commandl的命令按钮,其单击事件过程代码如下:PrivateSubCommandlClick()StaticxAsVariantn=0x=Array(1,2,3,4,5,6,7,8
阅读程序:Subp(b()AsInteger)Fori=1To4b(i)=2(iNextiEndSubPrivateSubCommand1_Click()
为了保存一个VisualBasic应用程序,下列说法中正确的是
VisualBasic提供的工具栏中,一般只显示______。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后如果在文本框中输入文本,则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是()。
下列程序代码实现生成20个0~100之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。请选择正确的程序段(),完成程序。PrivateSubCommandlClick()Dimarr(1To20)
把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintKeyCode;EndSubPriva
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填()。SubEnSure()DimyearAsIntegeryear=Val(InputBox("请输入年份:"))
数据库设计中反映用户对数据要求的模式是()。
随机试题
男,38岁。突然呕血约1500ml,伴柏油样大便,急诊入院。查体:神志清楚,四肢发凉。以下哪项护理措施是错误的
细胞静息电位的论述,不恰当的是
5岁患儿,发热、头痛、呕吐3天,抽搐1次。入院,查体:体温39℃,面色苍白,血常规示:白细胞22×109/L,中性粒细胞占0.88。该患儿最可能的诊断是
以下关于侵权案件的责任承担问题,说法正确的是:()
关于吊顶工程中钢筋吊杆的以下做法,不正确的是哪个?[2011—082]
课程改革的基本理念是()。①以学生发展为本②培养环境意识③以创新精神和实践能力培养为重点④减轻学生学习负担
Noonecandenythatpesticideshaveimprovedtheabilityoffarmerstobringtheircropstomarket.(1)_____pesticides,farmer
【S1】【S7】
ThetreatmentofthegypsypopulationoftheUnitedKingdomisdisgraceful.Localauthoritiesareslowtoprovidepermanentsite
Itisno(use)______arguingaboutit,becausehewillneverchangehismind.
最新回复
(
0
)