首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
在考生文件夹下有一个工程文件vbsj5.vbp,已给出了部分控件和部分程序。请在窗体上画三个标签,其名称分别为lblName、lblTel和lblPost,标题分别为“姓名”、“电话号码”和“邮政编码”。再画三个文本框,其名称分别为txtName、txtT
admin
2016-01-31
37
问题
在考生文件夹下有一个工程文件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
′考生编写如下事件过程的程序(cmdDisplay_Click)
Private Sub cmdDisplay_C1ick()
End SUb
Private Sub cmdSave_CliCk()
Open"out5.txt"For Output As #1
Print #1, txtName.Text,txtTe1.Text,
txtPoSt.Text
C1ose 1
End Sub
选项
答案
审题分析 本题需在“显示第三个记录”按钮的单击事件过程中,先声明一个自定义数据类型PalType的变量,然后用Open语句打开文件in5.txt,接着用Get#语句读出记录号为3的记录并赋值给自定义类型变量,最后将该变量各元素的值显示在对应文本框中。 操作步骤 步骤1:打开考生文件夹中的本题工程文件vbsj5.vbp,按表4-22在窗体中画出控件并设置其相关属性。 [*] 步骤2:在代码编辑窗口中,编写cmdDisplay_Click事件过程。 参考代码: PriVate Sub cmdDisplay_Click() Dim pers As PalType ODen"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://jikaoti.com/ti/qwJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出()beep声。SubTimer1_Timer()Fori=1to10BeepNextiEn
CommonDialog控件可以显示()对话框。
控件是()。
英文缩写“OOP’’的含义是()。
若要使用户不能修改文本框TextBoxl中显示的内容,应设置()属性。
以下()操作不能打开属性窗口
有下列函数过程:FunctionFunc2(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0i=2a=i+m+1b=i+a+bFunc2=mEnd
在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
在窗体上画一个命令按钮(其Name属性为Commandl),然后编写如下代码:PrivateSubCommandl_Click()Dima(5)Fori=0To4A(i)=i+1t=i+1
随机试题
当选用普通刀盘和切刀加工外球面时,可通过修磨切刀主偏角和副偏角调整刀尖回转直径尺寸。()
男性,70岁,反复冬春季咳嗽、咳白痰10年,胸闷、气急加重半天。
形成亡阳病理状态的主要因素有
患者,女,63岁。高热、寒战、咳嗽、咳痰、右胸痛3天急诊入院。查体:体温38.5℃,神志清楚,呼吸急促,口唇发绀,四肢厥冷,右下肺叩浊音,呼吸音弱,少量湿啰音,心率120次/分,律齐,心界正常,无杂音。血白细胞14×109/L,胸片示右下肺大片模糊阴影,P
下列表述中,不正确的说法是:()
对于报关员的权利,下列表述正确的是:
甲食品厂向乙面粉厂购买面粉20吨,货款共计12万元。2016年3月8日,甲食品厂向乙面粉厂出具了以自己为出票人、其开户行A银行为付款人、乙面粉厂为收款人、票面金额为12万元的见票即付的商业汇票一张,并在该汇票上签章。3月20日,乙面粉厂向丙机械厂购买一台磨
某学校有一批树苗需要栽种在学院路两旁,每隔5米栽一棵。已知每个学生栽4棵树,则有202棵树没有人栽;每个学生栽5棵树,则有348人可以少栽一棵。问学院路共有多少米?
对金融市场的功能说法错误的是()。
ThegrammaticalwordswhichplaysolargeapartinEnglishgrammarareforthemostpartsharplyandobviouslydifferentfrom
最新回复
(
0
)