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

admin2017-09-22  32

问题 在考生文件夹下有一个工程文件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
0

最新回复(0)