首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
2017-09-22
43
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3.82所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮保存数据,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码。参考代码: Text1.Text=n Countl=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 COUrtt5=count5+1 End Select Next Text2.Text=countl :Text3.Text= Count2 Text4.Text=count3 :Text5.Text= count4 Text6.Text=count5 步骤2:按
键运行程序,先单击“统计”按钮,再单击“保存”按钮。 步骤3:按要求将文件保存至考生文件夹中。
解析
本题要求编写“统计”按钮的单击事件过程。程序设计思路:在一个For循环中逐一取出存于数组arr中的各学生成绩,用Select Case语句对取出的某学生成绩进行判断,根据成绩所属情况,使对应文本框中的数增1。
转载请注明原文地址:https://kaotiyun.com/show/mjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要获取当前驱动器,应使用驱动器列表框的()属性。
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
假定有如下程序代码,程序运行后,把鼠标光标移到窗体内,每单击一次,变换一种鼠标光标的形状,依次显示鼠标光标的15个属性。请在划线处将程序补充完整。PrivateSubForm_Click()StaticxAsIntegerClsPri
下列程序运行后的输出结果是【】。PrivateSubf(k,s)s=1Forj=1Toks=s*jNextEndSubPrivateSubCommand1_Click()Sum=0Fori=1
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
在下图中,要在窗体的标签Label1上显示“二级VB等级考试”字样,标签属性应设置为______。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
如果准备读文件,打开顺序文件“text.dat”的正确语句是
在窗体上面一个命令按钮(其Name属性为Command1),然后编写如下代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=
决定一个窗体有无控制菜单的属性是______。
随机试题
化工厂的工作服不允许使用化纤布料,因为它容易产生静电。
美国《大西洋月刊》近期发表文章指出,________已成为全球恐怖主义的新中心,2013年成为非洲恐怖主义井喷年。()
地西泮化学结构中母核为()。
A.不宜超过1日B.不宜超过2日C.不宜超过3日D.不宜超过5日E.不宜超过7日解热镇痛药治疗发热
不属于银行本票付款日期的有()。
ATM网可提供光接口和电接口连接,标准接入速率是()。
说粤语的人很难说好普通话,主要受()的影响。
某人的大脑受到意外损伤后不能理解口语。依据机能理论,其大脑左半球损伤的区域可能是
直到买了一辆自己的车,软件设计员才意识到开车,特别是在高速公路上开车,是一大乐趣。
WhyMenExplodeAlthoughwomengetangryjustasoftenasmen,rageremainstheprototypicalmaleemotion."Mykidsstillta
最新回复
(
0
)