首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。
admin
2018-10-29
40
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮保存数据,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp, 在代码编辑窗口的指定位置编写以下代码。参考 代码: Text1.Text=n count1=0:count2=0:count3=0 count4=0:count5=0:count6=0 For i=1 To n Y=Int(arr(i)/10) Select Case Y Case 1,2,3,4,5 count1=count1+1 Case 6 count2=count2+1 Case 7 count3=count3+1 Case 8 count4=count4+1 Case 9,10 count5=count5+1 End Select Next Text2.Text=count1 :Text3.Text= count2 Text4.Text=count3 :Text5.Text= count4 Text6.Text=count5 步骤2:按<F5>键运行程序,先单击“统计”按钮,再单击“保存”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/EtFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为( )。
在窗体上画一个命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()DimArr(10)AsIntegerFori=1To10Arr(i)=
以下能接收焦点的控件是
如果要将一个窗体从内存中清除,应使用的语句是
为了在运行时能显示窗体左上角的控制框(即系统菜单),应执行的操作是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
下面不是键盘事件的是( )。
下面关于VB数据文件的叙述中错误的是()。
顺序文件在一次打开期间( )。
随机试题
痞满的基本治则是
患者,男,36岁。患血友病,在输血过程中出现头部胀痛、四肢麻木、腰背部剧痛、黄疸、血压下降等症状。患者尿液中可含有
2015年8月1日,用中国银行(以下简称“中行”)存款偿还某电子科技有限公司货款20000元,请填制记账凭证。
上市公司收购行为完成后,下列情形符合法律规定的有()。
直观是知识掌握的开端环节,是感性知识的重要来源,是理解抽象的科学知识的起点。缺乏这一起点,学生只能习得一些空洞的概念、原理,或者曲解概念和原理。因此,直观是知识掌握的开端环节,任何情况下教学都必须从直观开始。()
剩余价值率所反映的是()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是()。
在一个空的表单中添加一个选项按钮组控件,该控件可能的默认名称是()。
A、morethantwoweeksafterthererunpresidentialelectionB、lessthantwoweeksafterthererunpresidentialelectionC、moret
HongKongDisneylandiscountingonthepeaksummerseasonandmore【S1】______marketinginChinesecitiestohelpmakeupforthe
最新回复
(
0
)