首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图2.92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图2.92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读
admin
2018-12-20
43
问题
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图2.92所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读取考生文件夹下的inS.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,窗体文件名为sit5.frm。
选项
答案
【操作步骤】 步骤1:新建一个“标准EXE”工程,如表3-51在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Private Type Studlnfo Name As String*8 Sex As String*4 Age As Integer End Type Dim Stud As StudInfo Dim RecNum As Long Private Sub Commandl C1ick() Open App.Path&”\in5.txt”For Random As#1 Len=Len(Stud) RecNum=1 Do While Not EOF(1) Get #1,RecNum,Stud Textl.Text=Textl.Text&Stud.Name Textl.Text=Textl.Text&Stud Sex Textl.Text=Textl.Text&Str(Stud.Age) Textl.Text=Textl.Text+vbCrLf RecNum=RecNum+1 Loop Close 1 End Sub Private Sub Command2 Click() Open App.Path&”\out5.txt”ForOutput As#1 Print#1,Textl.Text Close 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/l8Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列说法中,错误的是( )。
下列有语法错误的赋值语句是( )。
窗体上有三个水平滚动条,名称分别为HSRed、HSGreen和HSBlue,取值范围均是0~255,代表颜色的三种基色。改变滚动框的位置,可以改变三种基色的值,从而改变窗体的背景色,如下图所示。[*130]程序代码如下:Dimcolor(3)As
以下叙述中正确的是( )。
在数据库设计中,将E-R图转换成关系数据模型的过程属于( )。
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为( )。
下列叙述中正确的是( )。
以下叙述中错误的是( )。
数据库管理系统是( )。
下面描述中不属于数据库系统特点的是
随机试题
唯心主义有两种基本形态()
Youreallyhavetogetveryoldbeforeyourealizeyou’reold.I’minmymiddlefiftiesandIdon’tfeeloldyet.However,somet
CIP保险的优点不包括()。
当初步设计深度不够,不能准确地计算工程量,但工程设计采用的技术比较成熟而又有类似工程概算指标可以利用时,可以采用()编制工程概算。
从基金管理人的角度来看,基金运作活动包含()。Ⅰ.基金份额的募集Ⅱ.基金的投资管理Ⅲ.基金的后台管理
企业之所以持有一定数量的现金,主要是fH于交易性需求、预防性需求和投机性需求。()(2007年)
税收是国家财政收入的重要组成部分,国家征税凭借的是()。
山东省会济南素有()之称。
英语课程要充分利用图书馆、语言实验室、音像设备等基本的和常规的教学设施。
Ihadbeenworkinginthetraumaunitatalocalhospitalforaboutayear.Yougetusedtofamiliesthinkingthata"coma"pati
最新回复
(
0
)