首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不
admin
2009-02-25
28
问题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
在考生文件夹下有工程文件sjt5.vbp及窗体文件sjt5.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号),但不能修改其他部分。存盘时不得改变文件名和文件夹,相应的dat文件也保存到考生文件夹下,否则没有成绩。
本题描述如下:
在名称为Form1的窗体上有五个Labe1控件和两个命令按钮,数据文件stud1.dat存放考生的考号、姓名、成绩。自定义一个数据类型stu,字符型数据定长为10;按“开始”按钮后,能从考生文件夹下的stud1.dat中读出所有数据并写入考生文件夹下的stud.dat文件中;执行完毕,“开始”按钮变成“完成”,且无效 (变灰)。程序运行界面如图13-6所示。
选项
答案
单击按钮触发其Click事件,标题由Caption属性设置;标签的标题也是由Caption属性设置;文件的操作一般按照如下步骤进行:打开或建立文件、进行读或写操作、关闭文件。 自定义数据类型通过Type语句来实现,形式如下: Type 自定义类型名 元素名[(下标)]As类型名 …… [元素名[(下标)]As类型名] End Type 对于字符串变量类型,根据其存放的字符串长度是否固定,其定义方法有两种: Dim 字符串变量名 As String Dim 字符串变量名 As String*字符数 程序中用到了App对象的Path属性。Path属性返回或设置当前路径,在设计时是不可用的,对于App对象,在运行时是只读的。解题步骤: 第一步:编写程序代码。 程序提供的代码: Private Type stu num As Long ’ nam As String ? score As Single ’End Private Sub COMEXIT_Click() End End Sub Private Sub COMSTART_Click() ’Dim rec As Dim i As Integer ’myfile1=App. Path & "\" & ? ’myfile2=App. Path & "\" & ? Open myfilel For Input As #1 Open myfile2 For Output As #2 For i=1 To 8 ’ Input ?, rec.num, rec.nam, rec.score ’ Write ?, rec.num, rec.nam, rec.scbre Next i Close ’COMSTART.Caption=? ’COMSTART.Enabled=? End Sub 参考代码: Private Type stu num As Long nam As String * 10 score As Single End Type Private Sub COMEXIT_Click() End End Sub Private Sub COMSTART_Click() Dim rec As stu Dim i As Integer myfile1=App.Path & "\" & "stud1.dat" myfile2=App.Path & "\" & "stud.dat" Open myfile1 For Input As #1 Open myfile2 For Output As #2 For i=1 To 8 Input #1, rec.num, rec.nam, rec.score Write #2, rec.num, rec.nam, rec.score Next i Close COMSTART.Caption="完成" COMSTART.Enabled=False End Sub 第二步:调试并运行程序。 第三步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/qh1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有一个接口定义如下:interfaceA{intmethod1(inti);intmethod2(intj);}那么下面各项中实现了该接口并且不是抽象类的是()。
下面程序段是创建一个Date类的对象并把它串行化保存到文件中,该对象表示的是运行时刻的日期及时间,请将程序补充完整。importjava.util.*;imporjava.io.*;publicclassSerializeD
JDK中,用()命令对其源文件进行编译,生成字节码文件。
在数据库管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是()。
本题程序中实现了一个“生产者一消费者问题”。生产者产生一个随机数存入DataPool类中,消费者从中取出数据。DataPool类一次只能存放一个数据。请更正题中带下划线的部分。注意:不改变程序的结构,不得增行或删行。classDataPo
final属性是专门定义【】变量的保留字。
算法的空间复杂度是指()。
使用()方法可以将JMenuBar对象设置为主菜单。
在关系数据库中,用来组织索引结构联系的是()。
随机试题
下列关于项目管理的说法正确的是()
月明星稀,乌鹊南飞。绕树三匝,何枝可依?山不厌高,海不厌深。周公吐哺,天下归心。这段文字表达了作者怎样的思想感情?
有关鼻,描述错误的是
会计软件是以()为核心。
甲公司对县工商局罚款10万元的行政处罚决定不服,向市工商局申请了行政复议。市工商局经审查,决定将罚款数额变更为5万元。要求:根据上述资料,分析回答下列小题。行政复议决定书发生法律效力的时间是()。
至于说到我的愿望,我想在某个安静的地方休息两个月。(asfor;somewhere)
根据我国《继承法》规定,遗产分割时,应当保留胎儿的继承份额。胎儿出生时是死体的,保留的份额()。
下列关于超文本的说法中,不正确的是()。
执行以下程序时,若输入end<回车>,则输出结果是【】。main(){charch[10]="Begin";gets(&ch[1]);puts(ch);}
Wheredoesthedialoguetakeplace?
最新回复
(
0
)