首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、11blTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txt
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、11blTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txt
admin
2016-12-29
28
问题
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、11blTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtTel和txtPost,初始内容均为空白,如图2.36所示。程序运行后,如果单击“显示第三个记录”命令按钮,则读取考生文件夹下in5.txt文件中的第三个记录,将该记录的三个字段分别显示在三个文本框中(该文件是一个用随机存取方式建立的文件,共有5个记录)。单击“保存”按钮,则把该记录(三个字段)保存到考生文件夹下的顺序文件out5.txt中。请编写“显示第三个记录”按钮的Click事件过程,以实现上述功能。
注意:考生不得修改已经存在的程序,必须用“保存”按钮存储结果,否则无成绩。最后,按原文件名把程序存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件vbsj5.vbp,按表3—22在窗体中画出摔什并设置其相关属性。 [*] 步骤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:按
键运行程序,先单击“显示第三个记录”按钮,再单击“保存”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/VnGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
建立一个新的标准模块,应该选择()下的“添加模块”命令。
下列程序的执行结果为()。PrivateSubCommandlClick()DimXAsInteger,YAsIntegerx=12:y=20CallValue(x,y)Pri
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
在数据库设计中,将E—R图转换为关系模式的过程属于()。
结构化程序设计的3种基本结构是()。
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为()。
在窗体上画一个通用对话框,其Name属性为Cont,再画一个命令按钮,Name属性为Commandl,然后编写如下事件过程:PrivateSubCommandlClick()Cont.FileName=“”Cont.Flags=vbOF
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
在窗体上画两个文本框(其Name属性分别为Textl和Text2)和一个命令按钮(其Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandlClick()x=0DoWhileX
随机试题
简述流行性脑脊髓膜炎普通型的临床表现。
影响尿路感染的因素有哪些?
患者男性,20岁,阵发性晨间咳嗽、憋气1周就诊,检查两肺呼吸音清。询问病史:患者4个月前曾有上呼吸道感染。为确定诊断,下列哪项检查最有价值
男性,54岁,骨病变活检镜下见皮质骨表现为层板骨纹理结构粗糙,部分骨细胞消失,骨陷窝空虚,并可见微裂;骨髓小动脉内膜、内弹力层消失,肌层纤维化,外膜增厚。病理诊断应为
某医师随机抽取正常大白鼠13只,由测得的内毒素x(μg/ml)与24小时肌酐清除率y(ml/分)的数据算出∑x=1.32∑x2=0.15∑xy=189.19∑y=1728.03∑y2=244464.11,则有
再生障碍性贫血引起贫血最主要的原因是()
行政立法的立法性质主要表现在()。
下列属于极端状态的市场有()。
2005年7月1日是星期五,那么2008年7月1日是星期几?
施测某标准化测验获得原始分数均值为80,标准差为16;导出分数均值为50,标准差为10。某被试参加测试所得导出分数为70,那么它的原始分数是
最新回复
(
0
)