首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一Label控件和两个命令按钮,数据文件in5.dat存放了一些成绩。按“开始”按钮后,从考生文件夹下的in5.dat中读出数据并求出它们的总分和
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm,该程序是不完整的。在名称为Forml的窗体上有一Label控件和两个命令按钮,数据文件in5.dat存放了一些成绩。按“开始”按钮后,从考生文件夹下的in5.dat中读出数据并求出它们的总分和
admin
2009-03-26
78
问题
在考生文件夹下有工程文件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://kaotiyun.com/show/3V1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在编写JavaApplet程序时,若需要对发生的事件作出响应和处理,一般需要在程序的开头写上()语句。
下列选项中,不属于JDK文件子文件夹的是()。
下列关于栈的描述中错误的是()。
下面OneFrame类创建了一个名为ThisisaFrame的窗口。importjava.awt.*;publicclassOneFrameextendsFrame{publicstaticvoid
下列安全控制命令中,属于现实证书缓存区和密钥表项命令的是()。
数据的逻辑结构是指()。
强行排错法涉及的调试技术主要是【】和监视表达式。
下列操作中,不属于Applet安全限制的是()。
数据流图用于描述一个软件的逻辑模型,数据流图由一些特定的图形符号构成。下列图符名称标识的图符不属于数据流图合法图符的是()。
char类型的取值范围是()。
随机试题
以下几个数中,相等的数有()。
阿胶熟地黄
导致上颌全口义齿在静止状态时固位良好,但说话、大张口时易脱落的原因是
A.EPSPB.IPSPC.终板电位D.发生器电位E.锋电位闰绍细胞释放抑制性递质可使α运动神经元的胞体产生
下列叙述违反《民用爆炸物品安全管理条例》规定的有()。
安装工程一切险的除外责任主要有()
纳税人到外县(市)临时从事生产经营活动的,税务机关按照一地一证的原则核发《外管证》,其有效期限一般为( ),最长不得超过( )。
()是公安工作的根本态度。
2016年中央一号文件提出,要牢固树立和深入贯彻落实创新、协调、绿色、开放、共享的发展理念,用发展新理念破解“三农”新难题。下列选项中,体现了“农业绿色发展理念”的是()。
山东菜山东是许多著名学者的故乡,例如孔夫子和孟子。许多山东菜的历史和孔夫子一样悠久,使得山东菜系成为中国现存的最古老的主要菜系之一。山东菜系,由济南菜系和胶东菜系组成,清淡,不油腻,以其香,鲜,酥,软而闻名。山东菜系注重汤品。清汤清澈新鲜,而油汤
最新回复
(
0
)