首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一Label控件和两个命令按钮,数据文件in5.dat存放了一些成绩。按“开始”按钮后,从考生文件夹下的in5.dat中读出数据并求出它们的总分和
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一Label控件和两个命令按钮,数据文件in5.dat存放了一些成绩。按“开始”按钮后,从考生文件夹下的in5.dat中读出数据并求出它们的总分和
admin
2009-03-26
26
问题
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一Label控件和两个命令按钮,数据文件in5.dat存放了一些成绩。按“开始”按钮后,从考生文件夹下的in5.dat中读出数据并求出它们的总分和平均分,将结果写入考生文件夹下的out5.dat文件中;执行完毕,“开始”按钮变成“完成”,且无效(变灰)。如图10—5所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件名和文件夹,相应的dat文件也保存到考生文件夹下,否则没有成绩。
选项
答案
命令按钮的标题由Caption属性来设置,单击命令按钮触发Click事件;执行完毕。“开始”按钮变成“完成”,且无效(变灰);Open“in5.dat”For Input As#1以只读方式打开文件,读出数据;程序中用到的Input读文件的格式为:Input#文件号,变量列表,在将数据写入文件时,要使用Write#语句而不是使用Print#语句,因为Write#语句能够将各个数据项正确地区分开。 根据题意,将一个标签和两个命令按钮添加到窗体中,标签的Caption属性为“从考生文件夹下的in5.dat中读出数据并求出它们的总分和平均分,将结果写入考生文件夹下的out5.dat文件中”,命令按钮的名称分别为Commandl和Command2、Caption属性分别为“开始”和“关闭”。双击Commandl进入代码编写窗口,利用EOF来判断是否读完数据,利用计数记录读取数据的个数,补充后的具体代码如下: Private Sub Commandl_Click()’开始命令 Dim total AS Long Dim temp AS Integer Dim str As String Dim num As Integer tota1=0 num=0 Open App.Path&"\in5.dat"For
Input As#1
’打开文件进行渎取 While
EOF(1)=False
’如果没读到文件尾继续读取 Input#1.str temp=Val(str) ’将读到的字符串转换成数值 total=total+temp’进行累加 num=num+1 ’计数加1 Wend Close#1 Open App.Path&"\out5.dat”For Output As#2’打开文件,进行写入 Write#2,"总和是" Write#2,total’写入总和 Write#2,"平均值是" Write#2,total\num’写入平均值 Commandl.
Enabled
=False’计算完成后Commandl不可用 Commandl.
Caption
="完成" ’Commandl的名称变为完成 End Sub Private Sub Command2_Click() ’关闭命令
Unload Me
End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://jikaoti.com/ti/DLq0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
创建图形用户界面的步骤是先创建代表图形化用户界面容器,再添加需要的组件,创建需要的接口,然后创建【】,并建立它和所对应的接口组件之间的联系,使得接口可以接纳用户事件。
需求分析最终结果是产生()。
一个applet标记中,必须出现的属性项有【】、WIDTH、HEIGHT。
在文件类提供的方法中,用于创建文件夹的方法是()。
希望编写好的Java程序代码,应遵守命名规则、【】、为代码分段、适当使用空白行、遵循第32条规则。
下列叙述中正确的是()。
如下图所示的4棵二叉树中:不是完全二叉树的是()。
对鼠标点击按钮操作进行事件处理的接口是()。
若x、a、b和c均是int型变量,则执行表达式x=(a=1,b=2)后的结果是()。
int类型的取值范围为
随机试题
工业纯铝的线膨胀系数约为低碳钢的()。
(2010年4月)“不得包养情人”属于行政机关公务员应该遵守的______。
目前调强实现的方式有
案情:甲与乙分别出资60万元和240万元共同设立新雨开发有限公司(下称新雨公司题),由乙任执行董事并负责公司经营管理,甲任监事。乙同时为其个人投资的东风有限责任公司(下称东风公司题)的总经理,该公司欠白云公司货款50万元未还。乙与白云公司达成协议约定:若3
在现浇普通钢筋混凝土楼盖时,控制裂缝的主要施工措施有()。
下列方案中哪个方案能满足防火规范?[2006年第38题]
实行财政直接支付的支出包括()。
儿童对勇敢和冒险不能分辨主要是他们的抽象逻辑思维水平比较低的缘故。()
(2012联考48)由细颗粒物造成的灰霾天气对人体健康的危害要比沙尘暴更大。粒径10微米以上的颗粒物会被挡在人的鼻子外面;粒径在2.5微米至10微米的颗粒物,能够进入上呼吸道,但部分可通过痰液等排出体外,另外也会被鼻腔内部的绒毛阻挡,对人体健康危害相对较小
下列各项中不属于法人变更的是()。
最新回复
(
0
)