首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Commantt2,标题分别为“显示”和“保存”,如图1-185所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Commantt2,标题分别为“显示”和“保存”,如图1-185所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,
admin
2010-09-02
35
问题
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Commantt2,标题分别为“显示”和“保存”,如图1-185所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读取考生文件夹下的in5.txt文件,并在文本框中显示出来,该文件是一个用随机存取方式建立的文件,共有5个记录,要求按记录号顺序显示全部记录,每个记录一行;如果单击“保存”按钮,则把所有记录保存到考生文件夹下的顺序文件out5.txt中。随机文件in5.txt中的每个记录包括三个字段,分别为姓名、性别和年龄,其名称和长度分别为:
其类型定义为:
PriVateTypeStudInfo
NameAsString*8
SexAsString*4
AgeAsInteger
EndType
要求:文件out5.tKt以顺序存取方式建立和保存。存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
【操作步骤】 步骤1:新建一个“标准EXE”工程,如表2-104在窗体中画出控件并设置其相关属性。 [*] 步骤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 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"For Output As#1 Print#1,Textl.Text Close 1 End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
程序设计思路:在“显示”按钮的单击事件过程中,用Open语句以随机方式打开数据文件in5.txt,并用Get读出一条记录显示在文本框中,随后读取下一条记录,直到所有的记录都读取完毕:在“保存”按钮的单击事件过程中,用Open语句以Output方式打开数据文件out5.txt,并用Print撑方法将文本框中的值存入该文件。
转载请注明原文地址:https://kaotiyun.com/show/KGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列不属于JComponent类的功能的是( )。
下列关于基本数据类型的说法中,不正确的是( )。
数据流图用于抽象描述一个软件的逻辑模型,数据流图由一些特定的图符构成。下列图符名标识的图符不属于数据流图合法图符的是( )。
下述关于数据库系统的叙述中正确的是( )。
下列程序的输出结果是( )。publicclassTest{publicstaticvoidmain(String[]args){chara1=’B’,a2=’c’;
包含Swing构件的Applet(小应用程序)应该是______类的子类。
用HTML文件显示APPLET时,下面属于必不可少的属性的是
Java中的继承机制之所以能够降低程序的复杂性,提高编程的效率,主要是因为它使代码可______。
下列程序实现对ZIP文件file.zip的检索,在横线处填入正确的语句packagetest;importjava.io.*;importjava.util.*;importjava.util.zip.*;p
随机试题
重力式分离器进气管法兰泄漏的原因之一是()。
艺术的起源是多因的。
明确提出"寸百虫"的感染途径是饮食不当的最早著作是
影响舒适的人际关系环境因素是
下列选项中,不能被认定为废标的是()。
D注册会计师负责对丁公司20×4年度财务报表进行审计。在审计银行存款时,D注册会计师遇到下列事项,请代为作出正确的专业判断。D注册会计师实施的下列程序中,属于控制测试程序的是()。
某市要建设一个垃圾焚烧发电厂,周围群众听说发电厂有致癌物质会影响群众的身体健康,组织了大规模反对活动,使该项目进程中断。该项目已经确定,再无更优方案。假如你作为负责这个项目的市政府负责人,针对这种情况怎样处理此事?请你谈谈你的措施和做法(要有前瞻性和可操作
中央银行在经济衰退时,可()法定存款准备金率。
谢某在网上注册了几个QQ号码,通过网上微博等社交工具宣传自己的号码并且注明了能够通过这些号码进行色情聊天,两年时间里,谢某聊天的对象基本上覆盖了所有省份,裸聊对象500多人,收到汇款共计5万元。下列说法正确的是()。
Everyyear,theNobelPrizeisgiventooutstandingworkinsixfields:physics,chemistry,medicine,literature,economics,and
最新回复
(
0
)