在考生文件夹下有一个工程文件sjt5．vbp，窗体如图3—82所示。运行程序时，从数据文件中读取学生的成绩(均为整数)。要求编写程序，统计总人数，并统计不及格、60～69、70～79、80～89及90～100各分数段的人数，将统计结果显示在相应的文本框中。

admin2019-05-14 46

问题在考生文件夹下有一个工程文件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 Fori=1Ton y=Int(arr(i)／10) Select Case y Case1，2，3，4，5 count1=COUnt1+1 Case6 count2=count2+1 Case7 count3=count3+1 Case8 count4=count4+1 Case9，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：按要求将文件保存至考生文件夹中。

解析本题要求编写“统计”按钮的单击事件过程。程序设计思路：在一个For循环中逐一取出存于数组arr中的各学生成绩，用Select Case语句对取出的某学生成绩进行判断，根据成绩所属情况，使对应文本框中的数增1。

转载请注明原文地址:https://kaotiyun.com/show/EHUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类