首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
39
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSub
在窗体上画一个名称为Text1的文体框,然后画一个名称为HScrolll的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图所示。以下能实现上述操作的程序段是
使用语句DimAAsInteger声明数组A之后,以下说法正确的是()。
排序是计算机程序设计中的一种重要操作,常见的拌序方法有插入排序、______和选择排序。
假定有下表所列的菜单结构:要求程序运行后,如果单击菜单项“大图标”,则在该菜单项前添加一个“√”。以下正确的事件过程是
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
启动窗体在【】对话框中指定。
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsString,cAsIntegera=1234:
随机试题
最早提出“意境”一词的是【】
形成腮腺鞘的筋膜来自于
A.冲脉B.任脉C.督脉D.带脉E.阳维脉
根据《担保法》的规定,下列关于保证的表述中正确的有()。
甲为持有某有限责任公司全部股东表决权10%以上的股东。根据公司法律制度的规定,在某些事由下,若公司继续存续会使股东利益受到重大损失,且通过其他途径又不能解决的,甲提起解散公司诉讼时,人民法院应予受理。下列选项中,属于上述“某些事由”的有()。
通过货物中转集运的()方式,可使运输成本下降。
从2002年开始,我国的离婚率就一路走高。专家表示,我国离婚率上升的原因不能简单解释为社会风气不好,一方面与原来整体离婚率水平比较低有关;另一方面也与中国社会方方面面的变化以及舆论环境、社会观念变化有关。以下哪项如果为真,最能支持专家观点?
锐进软件股份有限公司是一个由四个子公司,即甲、乙、丙、丁组成的总公司。在总公司的利润方案下,每个子公司承担的利润份额与每年该子公司员工占锐进软件股份有限公司总员工数的份额相等。但是去年该公司的财务报告却显示,甲公司在员工数量增加的同时向总公司上缴利润的比例
AsurveyaskedBritishmumswhoworkoutsidethehomewhattheywouldmostlikeforMother’sDay.Andwhatdidtheyreply?"Flow
Thechocolatebarmanufactureratthecentreofanextortionthreatsaysthere’snoconfirmedlinkbetweenitsproductsandilln
最新回复
(
0
)