首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。
admin
2016-01-31
46
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体如图3-25所示。运行程序时,从数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,并统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮保存数据,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
审题分析 本题要求编写“统计”按钮的单击事件过程。程序设计思路:在一个For循环中逐一取出存于数组arr中的各学生成绩,用Select Case语句对取出的某学生成绩进行判断,根据成绩所属情况,使对应文本框中的数增1。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口的指定位置编写以下代码: 参考代码: Text1.Text=n count1=0 count2=0 count3=0 count4=0 count5=0 count6=0 F0r i=1 To n y=Int(arr(i)/10) Select Case v 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 Npxf Text2.Text=count1 Text3.Text=count2 Text4.Text=count3 Text5.Text=count4 Text6.Text=count5 步骤2:按
键运行程序,先单击“统计”按钮,再单击“保存”按钮。 步骤3:按要求将文件保存至考生文件夹中。 考点链接 For循环结构、多分支结构
解析
转载请注明原文地址:https://kaotiyun.com/show/guLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据结构分为逻辑结构与存储结构,线性链表属于______。
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To9Sum=Sum=iNextiText1.T
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
组合框是组合了文本框和列表框的特性而组成的一种控件。______风格的组合框不允许用户输入列表框中没有的项。
使两种完全不同的应用程序进行通信的技术称为()技术。
若要将一个窗体从内存中清除,应该使用的方法是()。
在设计阶段,当按Ctrl+R键时,所打开的窗口是
有三个关系R,S和T如下:则由关系R和S得到关系T的操作是
关于变量作用域,下列叙述中正确的是()。
软件工程学中除软件开发技术需重视外,另一重要组成内容是软件的【】。
随机试题
女性,32岁,腹胀,右下腹痛1年半,伴发热,体温37~38℃,出汗多,查体一般情况尚可,腹韧,右下腹可触及3cm×4cm包块,边界尚清,压痛,ESR75mm/h。
正常宫颈阴道上皮是()
关于几种灌注桩施工工艺特点的描述中,()是正确的。
对复杂结构的桥梁或拆除过程复杂、困难的情况,应该采取()手段,确保施工安全。
“备案号”栏应填:“运输方式”栏应填:
证券公司申请融资融券业务资格,其客户资产必须安全、完整,客户交易结算资金实行()。
下列关于银行对提前还款基本约定的表述,错误的是()。
宏观经济调控体系由()组成。
为亚述帝国奠定版图基础的是公元前9世纪前期的亚述王()。
LongbeforeManlivedontheEarth,therewerefishes,reptiles,birds,insects,andsomemammals.Althoughsomeoftheseanimal
最新回复
(
0
)