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

admin2017-09-20  26

问题 在考生文件夹下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70一79、80一89及90一100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
    注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮,否则将没有成绩,最后将修改后的文件按原文件名进行存盘。

选项

答案【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 For i=1 To n’循环判断分数的范围,当满足某个条件时则分别统计 If arr(i)<60 Then Text2=Val(Text2)+1 ElseIf arm(i)>=60 And arr(i)<70 Then Text3=Val(Text3) +1 ElseIf arr(i)>=70 And arr(i)<80 Then Text4=Val(Text4)+1 ElseIf arr(i)>=80 And arr(i)<90 Then Text5=Val(Text5)+1 ElseIf arr(i)>=90 And arr(i)<= 100 Then Text6=Val(Text6)+1 End If Textl=Val(Textl)+1’显示统计人数 Next 步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析
转载请注明原文地址:https://kaotiyun.com/show/nkGp777K
0

最新回复(0)