首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为”显示”和”保存”,如图2-185所示,编写适当的事件过程。程序运行后,如果单击”显示”按钮,则
在窗体上画一个文本框,其名称为Textl,初始内容为空白,并设置成多行显示格式;然后再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为”显示”和”保存”,如图2-185所示,编写适当的事件过程。程序运行后,如果单击”显示”按钮,则
admin
2013-10-18
60
问题
在窗体上画一个文本框,其名称为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全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写下列程序:OptionBase_1PrivateSubCommand1_Click()Dima(10)AsIntegerFori=1To10a(i)=iNextCall
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是()。
按照软件测试的一般步骤,集成测试应在【】测试之后进行。
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
在考生文件夹下有一个工程文件sj5.vbp,在Form1的窗体中有一个标签,3个命令按钮和一个计时器。程序的功能是:运行时,单击“开始计数”按钮,就开始计数,每隔1秒,标签中的数加l,且该按钮不可用,“倒数计数”按钮可用;单击“倒数计数”按钮时,则倒数计数
在窗体上画—个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(str(c))Fori=1To4Print_____
将代数式转换成程序设计中的表达式为【】。
下面不属于软件工程的3个要素的是______。
表达式Len(Str(1.3))Mod2的值为______。
随机试题
甲箱中有5个正品和3个次品,乙箱中有4个正品和3个次品,从甲箱中任取三个产品放入乙箱,再从乙箱中任取一个产品,求这个产品是正品的概率.
习近平新时代中国特色社会主义思想的历史地位是()
装修公司甲在完成一项工程后,将剩余的木地板、厨卫用具等卖给了物业管理公司乙。但甲营业执照上的核准经营范围并无销售木地板、厨卫用具等业务。甲、乙的买卖行为的法律效力是()
Alumpsumputdownatthetimeofthepupil’sentrytocoverallorpartofthelikelyfeesmightattractareductionofsome1
关于超声心动图二尖瓣多普勒检测的叙述,正确的是
A.99%B.90%C.5%D.10%E.95%食物中的脂类甘油三酯占
公安机关在侦查一起走私犯罪案件的过程中,怀疑某邮电局的信箱里有犯罪嫌疑人刚刚投递的与案件有关的信件。公安机关要想获取该信件,应当如何做?()
银行业金融机构不按照规定提供报表、报告等资料的,由银行业监督管理机构责令改正,逾期不改正的,处以()罚款。
下列费用中,应当在发生时确认为当期损益,不计入存货成本的有()。
根据下列资料,回答问题。2014年,某自主创新示范区输出境内的技术合同总数为11456项,技术合同成交额为211.92亿元,分别占全市输出境内的47.55%和49.66%。2014年该示范区输出境内的技术合同中,电子信息技术领域的合同成交额
最新回复
(
0
)