首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
admin
2016-03-22
63
问题
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtTel和txtPost,初始内容均为空白,如图3-36所示。程序运行后,如果单击“显示第三个记录”命令按钮,则读取考生文件夹下in5.txt文件中的第三个记录,将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件,共有5个记录)。单击“保存”按钮,则把该记录(三个字段)保存到考生文件夹下的顺序文件out5.txt中。请编写“显示第三个记录”按钮的Click事件过程,以实现上述功能。
注意:考生不得修改已经存在的程序,必须用“保存”按钮存储结果,否则无成绩。最后,按原文件名把程序存盘。
程序源码:
Private Type PalType
Name As String*8
Tel As String*10
Post As Long
End Type
考生编写如下事件过程中的程序(icmdDisplay—Click)
Private Sub cmdDisplay—Click()
End Sub
Private Sub cmdSave Click()
Open”out5.txt”For Output As#1
Print#1,txtName.Text,txtTe1.Text,
txtPost,Text
close 1
End Sub
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件vbsj5.vbp,按表4.22在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口中,编写cmdDisplay_Click事件过程。 参考代码: Private Sub cmdDisplay C1ick() Dim pers As PalType Open“in5.txt”For Random As#1 Len= Len(pers) Get#1,3,pers txtName.Text=pers.Name txtTel.Text=pers.Tel txtPost.Text=pers.Post Close#1 End Sub 步骤3:按
键运行程序,先单击“显示第三个记录”按钮,再单击“保存”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/pMLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要使文本框获得输入焦点,则应采用文本框控件的方法是
下列叙述中,不属于软件需求规格说明书的作用的是
在关系A(S,SN,D)和关系B(D,CN,NM)中,A的主关键字是s,B的主关键字是D,则称是关系A的外码。
下面描述中错误的是
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Labell,然后编写如下代码:SubS(xAsInteger,YAsInteger)StaticzAsIntegery=x*x+
在数据库设计中,将E-R图转换成关系数据模型的过程属于
随机文件用于读数据的语句是
下面关于多重窗体的叙述中,正确的是()。
在E-R图中,用来表示实体的图形是()。
对象是既包含数据又包含对______的方法,并将其封装起来的一个逻辑实体。
随机试题
《素问.五藏生成篇》说“多食咸”可致()(2002年第10题)
Whatdoes"it"refertointhesentence"Ithinkitimportanttoachieveanagreementonthisissue"?
求下列定积分:
维持个体和社会生存与发展的必要事物在人脑中的反映,称之为【】
口腔修复工艺焊接技术中,常用的白合金焊料熔化温度A.350~450℃B.500~600℃C.650~750℃D.800~850℃E.950~1050℃
施工项目质量控制的实施程序不包括( )。
证券交收的实质是依据清算结果实现证券与价款的收付,从而结束整个交易过程。()
2016年1月1日,甲拒绝向乙支付到期租金,乙忙于事务一直未向甲主张权利。2016年6月20日,乙因出差遇险无法行使请求权的时间为20天。根据诉讼时效法律制度的规定,乙请求人民法院保护其权利的诉讼时效期间是()。
刑事裁判涉财产部分,由作出生效裁判的人民法院执行。作出生效裁判的人民法院可以委托财产所在地的同级人民法院执行。()
TheEconomistcalculatesthataroundtheworldalmost290million15-to24-year-oldsareneitherworkingnorstudying:almosta
最新回复
(
0
)