首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
admin
2016-03-22
70
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
下面程序的功能是统计字符串中"i"的个数,请填空。SubCOU()DimnAsIntegera$="BeijingUniversityofTechnology"n=Len(a$)Fori=1Ton
窗体上有一个名为Commandl的命令按钮,并有如下程序:PrivateSubCommand_Click()DimaAsInteger,bAsIntegera=8b=12PrintFu
下面程序的执行结果是PrivateSubCommandl_Click()a=1OFork=lTo5Step一1a=a--kNextkPrinta;kEndSub
假定用下面的语句打开文件:Open“Filel.txt”forInputAs#1则不能正确读文件的语句是
如果一个直线控件在窗体上呈现为一条垂直线,则可以确定的是
产生[10,27]之间的随机整数的VisualBasic表达式是
下列选项中不符合良好程序设计风格的是
如果准备读文件,打开顺序文件”text.dat”的正确语句是()。
同一概念在一处为实体而在另一处为属性或联系的冲突在视图集成中叫()。
下列特征中不是面向对象方法的主要特征的是()。
随机试题
他特意到那里去,看看发生了什么事。
既能行气除满,又可平喘的药物是
专业监理工程师是由总监理工程师任命,组织并带领一般监理人员对设备工程直接监理的人员。专业监理工程师应当具备()条件。
1.背景材料:某施工单位承包了高速公路M合同段路基工程,合同工期2年,每年5~8月为雨期。本合同段有填有挖,且需以挖做填,项目部充分考虑雨期对施工的影响,对选择施工的项目进行详细考察,编制雨期施工专项方案,项目物资部门针对雨期施工方案,在雨期施工
根据《企业破产法》的规定,下列选项中,属于全面接管具体职责的是()。
某公司于2009年1月1日购入一项专利权。初始入账价值为900万元。该专利权预计使用年限为12年,法律保护年限是10年,采用直线法摊销。该专利权在2009年12月31日预计可收回金额为783万元,2010年12月31日预计可收回金额为698万元。假定该公司
玩忽职守罪的主观方面只能是()。
Duringthesystemsanalysisphase,greateruserinvolvementusuallyresultsinbettercommunication,fasterdevelopmenttimes,and
下列安全协议中,位于网络层的是(1),位于应用层的是(2)。(2)
堆排序最坏情况下的时间复杂度为
最新回复
(
0
)