首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3—111所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3—111所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则
admin
2018-10-29
60
问题
在窗体上画一个文本框,其名称为Text1,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“显示”和“保存”,如图3—111所示,编写适当的事件过程。程序运行后,如果单击“显示”按钮,则读取考生文件夹下的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”工程,如表4-67在窗体中画出控件并设置其相关属性。 [*] 步骤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) ReCNum=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 RecNum=RecNum+1 Loop CloSe 1 End Sub Private Sub Command2 Click( ) Open App.Path &"\out5.txt"For Output As #1 Print#1,Text1.Text Close 1 End S1ab 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/4CFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("请输入一个整数")) fun(x)EndSubPrivate
在数据库设计中,将E-R图转换成关系数据模型的过程属于( )。
窗体上有一个名称为Text1的文本框;一个名称为Timer1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer() StaticflagA
对于列表框控件List1,能够表示当前被选中列表项内容的是( )。
下列关于水平滚动条的叙述中,错误的是
如果要在窗体上使用2组单选按钮,每组都可以有一个被选中,则应该做的是( )。
顺序文件在一次打开期间( )。
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是( )。
下面不是键盘事件的是( )。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
随机试题
阐述保护幼稚工业理论的主要观点,并进行评价。
患者男性,31岁。咳嗽,呈刺激性,干咳,偶有咳少量黏稠痰,受寒冷刺激加重,伴气促,每天晚间、清晨均有剧咳而影响睡眠,用过青霉素、氨苄西林、头孢菌素和多种祛痰止咳剂未能缓解。查体:双肺散在哮鸣音,心脏(-)此病人最可能的诊断是
17-羟化酶缺陷,可出现哪些生化异常
呼气性呼吸困难最常见于
对初步诊断有意义的首要检查是若该患儿体检发现口唇黏膜青紫,胸骨左缘2~3肋间闻及2/6~3/6级收缩期杂音,P2减弱、轻度杵状指(趾),为进一步明确先心病类型,最简便经济的检查是
某女,60岁。慢性肾炎10年,现面浮身肿,按之凹陷不起,心悸,气促,腰部冷痛酸重,小便量少,形寒神疲,面色晦滞,舌淡胖,苔白,脉沉细无力。检查:蛋白尿5.0g/d,血清蛋白25g/L。治疗应选用
下列关于权利质押的表述,正确的是():
可以把社区划分成()。
马克思认为,造成人的片面发展的根本原因是()
InWashingtonthisweek,TreasurySecretaryGeithnerannouncednewstepstorebuildtrustinfinancialmarketsandrestartthef
最新回复
(
0
)