首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3-92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3-92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读
admin
2019-05-14
41
问题
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3-92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读取考生文件夹下的in5.txt文件,并在文本框中显示出来,该文件是一个用随机存取方式建立的文件,共有5个记录,要求按记录号顺序显示全部记录,每个记录一行;如果单击“保存”按钮,则把所有记录保存到考生文件夹下的顺序文件out5.txt中。随机文件in5.txt中的每个记录包括三个字段,分别为姓名、性别和年龄,其名称和长度分别为:
其类型定义为:
PriVate Type StudInfo
Name As String*8
Sex As String*4
Age As Integer
End Type
要求:文件out5.txt以顺序存取方式建立和保存。存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
审题分析 本题程序设计思路:在“显示”按钮的单击事件过程中,用Open语句以随机方式打开数据文件in5.txt,并用Get读出一条记录显示在文本框中,随后读取下一条记录,直到所有的记录都读取完毕;在“保存”按钮的单击事件过程中,用Open语句以Output方式打开数据文件out5.txt,并用Print#方法将文本框中的值存入该文件。 操作步骤 步骤1:新建一个“标准EXE”工程,如表4-51在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Private Type StudInfo Name As String*8 Sex As String*4 Age As Integer End Type Dim Stud AS StudInfo Dim RecNum As Long Private Sub Command1_Click() Open App.Path&"\in5.txt"For Random As #1 Len=Len(Stud) RecNHm=1 Do While Not EOF(1) Get #1,RecNum,Stud Text1.Text=Text1.Text&Stud.Name Text1.Text=Text1.Text&Stud.Sex Text1.Text=Text1.Text&Str(Stud.Age) Text1.Text=Text1.Text+VbCrLf ReCNHm=RecNum+1 Loop Close 1 End Sub Private Sub Command2_C1ick() Open App.Path&"\out5.txt"For Output As #1 Print #1,Text1.Text Close 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。 考点链接 顺序文件、随机文件。
解析
转载请注明原文地址:https://jikaoti.com/ti/WSN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Form1,标题为“组合框”的窗体上画1个名称为Combo1的组合框,利用属性窗口设置适当属性使其在程序刚开始运行时的界面如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sit1.vbp,窗体文件名为sit1.frm。
以下关于控件数组的叙述中,错误的是
在名称为Form1,标题为“框架”的窗体上添加一个名称为:Frame1,且标题为空的框架。框架内含有两个单选按钮,名称分别为Opt1和Opt2,其标题分别为“字体”、“大小”。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件
在名称为Form1,标题为“练习”的窗体上添加一个名称为Frame1、标题为“效果”的框架。框架内含有三个复选框,其名称分别为Chk1、Chk2和Chk3,标题分别为“倾斜”、“加粗”和“下划线”。程序运行后的窗体如图所示。要求:存盘时必须存放在考生文
在名称为Form1的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Co
在名称为Form1的窗体上添加一个名称为Command1的命令按钮,标题为“打开文件”,再添加一个名称为CD1的通用对话框。程序运行后,如果单击命令按钮,则弹出打开文件对话框,请按下列要求设置属性和编写代码:①设置适当属性,使对话框的标题为“打开文件”;
要使标签中的文本靠右显示,应将其Aligraent属性设置为
设有下面的程序段iX=InputBox("请输入一个整数")ReDima(x)Fork=xTo0Step-1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面定义语句中正确的是
有下面程序代码:PrivateSubCommand1_Click()DimsignAsIntegersign=13a=1b=2Fork=1To5c=a+sign*ba=bb=cPrintc;sign=-signNe
在考生文件夹下有一个工程文件sjt4.vbp,窗体如图所示。其功能是单击“输入数据”按钮,则可输入一个整数n(要求:8≤n≤12);单击“计算”按钮,则计算1!+2!+3!…+n!的值,并将计算结果显示在文本框中;单击“存盘”按钮,则把文本框中的结果保存到
随机试题
人们进入百货公司,各自注意的东西总不一样,这是知觉()的表现。
胸膜粘连最常见的部位是
A.多见于50岁以前的中年妇女,外阴瘙痒为主要症状B.可发生于任何年龄妇女,以40岁左右发病率最高,晚期病例有阴道口挛缩狭窄C.青春期发病者居多,外阴色素减退,但皮肤光滑润泽、弹性正常D.常见于绝经后的老年妇女,阴道分泌物增多及外阴瘙痒是主要症状E
婴儿期用药应考虑的是
在一定条件下,已建立平衡的某可逆反应,当改变反应条件使化学平衡向正反应方向移动时,下列有关叙述正确的是()。
在浇筑竖向结构混凝土前,应先在底部填与混凝土内砂浆成分相同的水泥砂浆,其厚度应为()。
托管人可以委托符合条件的境外资产托管人负责境外资产托管业务。这些条件有()等。I.在中国大陆以外的国家或地区设立,受当地政府、金融或证券监管机构的监管Ⅱ.最近一个会计年度实收资本不少于100亿美元或等值货币,或托管资产规模不少于1000亿美元或
由兴趣、理想和荣誉感而推动学生努力学习的动机是()。
【2015河北张家口】皮格马利翁效应体现了教师的()对学生的影响。
“不懂几何不得入门,能谈哲学方可出门”,这句话是对()的学园的描述
最新回复
(
0
)