首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为”显示”和”保存”,如图2-185所示,编写适当的事件过程。程序运行后,如果单击”显示”按钮,则
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为”显示”和”保存”,如图2-185所示,编写适当的事件过程。程序运行后,如果单击”显示”按钮,则
admin
2013-10-18
46
问题
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为”显示”和”保存”,如图2-185所示,编写适当的事件过程。程序运行后,如果单击”显示”按钮,则读取考生文件夹下的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。
选项
答案
步骤1:新建一个”标准EXE”工程,如表3-104在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写相应事件过程。 参考代码: Private Type StudInfo Name As Strina*8 Sex As Strinq * 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 , RecNumf 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_Cl ick( ) Open App.path&”\out5.txt”For Output As #1 Print #1, Textl.Text Close 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/9HQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中,【】负责数据的模式定义与数据的物理存取构建。
在关系数据库中,用来表示实体之间联系的是【】。
结构化程序设计的基本原则不包括()。
按照软件测试的一般步骤,集成测试应在【】测试之后进行。
为计算a“的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimPAsLongP=aFork=lT0nP=P*aNextkp
以下关于过程及过程参数的描述中,错误的是
在设计窗体时双击窗体的任何地方,可以打开的窗口是
将E-R图转换为关系模式时,实体和联系都可以表示为______。
将数学表达式cos2(a+B)+5e2写成VisualBasic的表达式,其正确的形式是
下列各选项说法错误的一项是
随机试题
出版物宣传文字包括()等。
下列属于教师职业道德的功能有()
促进小组教学成功的最重要因素是()
下列选项中属于美国的《出口管理法》(EAA)关注重点的是()
心脏病的孕妇妊娠期心脏负荷最重的时间为
患者,男性,26岁。生殖器溃疡1周,伴腹股沟淋巴结肿痛和全身乏力,溃疡为丘疱疹和水疱破裂后形成。该患者的治疗药物首选
某承包商于某年承包某外资工程的施工,与业主签订的承包合同约定:工程合同价2000万元;若遇物价变动,工程价款采用调值公式动态结算。该工程的人工费占工程价款的35%,水泥占23%,钢材占12%,石料占8%,砂料占7%,不调值费用占15%;开工前业主向承包商支
通过宏查找下一条记录的宏操作是【】。
Rabiesisanordinarilyinfectiousdiseaseofthecentralnervoussystem,causedbyavirusand,asarule,spreadchieflybydo
A、Itrepresentsremarkabletechnologicaldevelopment.B、Itwilldolessharmtoenvironmentthanotherplanes.C、Wewillbenefit
最新回复
(
0
)