首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
admin
2019-05-14
28
问题
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtTel和txtPost,初始内容均为空白,如图3—72所示。程序运行后,如果单击“显示第三个记录”命令按钮,则读取考生文件夹下in5.txt文件中的第三个记录,将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件,共有5个记录)。单击“保存”按钮,则把该记录(三个字段)保存到考生文件夹下的顺序文件out5.txt中。请编写“显示第三个记录”按钮的Click事件过程,以实现上述功能。
注意:考生不得修改已经存在的程序,必须用“保存”按钮存储结果,否则无成绩。最后,按原文件名把程序存盘。
程序源码:
Private Type PalType
Name As String*8
Tel As String*10
Post As Long
End Type
考生编写如下事件过程的程序
(cmdDisplay_Click)
Private Sub cmdDisplay_Click()
End Sub
Private Sub cmdSave_Click()
Open"out5.txt"For Output As#1
Print#1,txtName.Text,txtTel.Text,txtPost.Text
Close1
End Sub
选项
答案
步骤1:打开考生文件夹中的本题工程文件vbsj5.vbp,按表4—44在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口中,编写cmdDisplay_Click事件过程。 参考代码: Private Sub cmdDisplay_Click() 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:按<F5>键运行程序,先单击“显示第三个记录”按钮,再单击“保存”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
本题需在“显示第三个记录”按钮的单击事件过程中,先声明一个自定义数据类型PalType的变量,然后用Open语句打开文件in5.txt,接着用Get#语句读出记录号为3的记录并赋值给白定义类型变量,最后将该变量各元素的值显示在对应文本框中。
转载请注明原文地址:https://kaotiyun.com/show/3UUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drivel、Dirl和Filel,为了使它们同步操作,必须触发驱动器的Change事件和目录的Change事件,在这两个事件中执行的语句分别为()。
下列程序的输出结果为()。S1=“1”:S2=“2”:S1=Val(S1)+VaI(S2):S2=Val(“12”)IfS1◇S2ThenPrintS1-S2ElsePrintS2一S1
设计窗体时双击窗体的任何位置,将打开()。
在利用菜单编辑器设计菜单时,为了把组合键设置为“打开(0)”菜单项的访问键,可以将该菜单项的标题设置为()。
关于MDI窗体下列说法正确的是()。
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为ComTestl。设窗体Forml标题为“MyForml”,双击控件数组中的第3个按钮,打开代码编辑器,编写如下代码:PrivaeSubComTestl——Click(Index
在运行阶段,要在文本框Text1获得焦点时选中文本框中所有内容,如图1所示,对应的事件过程是()。
在文本框中,要设置显示的文本颜色,应该设置()属性。
数列1,1,2,3,5,8,13,21,…的规律是从第三个数开始,每个数是它前面两个数之和。在考生目录下有一个工程文件sit5.vbp。窗体中已经给出了所有控件,如图3—87所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击“计算”按
随机试题
教师的教育机智属于知识素养中的_______。
A.夜间咳甚B.咳声不扬C.咳声低微D.咳声重浊E.天亮咳甚
下列何种表述不属于法的规则?()
下列对直流系统接线的表述,哪一条是不正确的?
3D立体技术代表了当前电影技术的尖端水准,由于使电影实现了高度可信的空间感,它可能成为来来电影的主流。3D立体电影中的银屏角色虽然由计算机生成,但是那些包括动作和表情的电脑角色的“表演”,都以真实演员的“表演”为基础,就像数码时代的化妆技术一样。这也引起了
数字摄像机的主要优点有()
西方文化是人类文化发展史上一颗璀璨的明珠,以下作品的作者身为同一个国家的是()。①《神曲》②《最后的晚餐》③《飞鸟集》④《唐璜》⑤《十日谈》
如果我国人民币实现国际化,被其他国家作为储备货币,则我国就成为储备货币发行国。到那时,我国的国际储备就可以()。
教育的质的规定性就是教育的()
对无线局域网,可显著提高数据率的技术是1.______。对有2台计算机、1个AP、采用300Mbps的802.11n的WLAN,2台计算机数据传输的概率相同,则每台计算机实际传送用户数据的最大理论速度最接近2.______MB/s。2._____
最新回复
(
0
)