怎么用VB来统计合格率和优秀率?
1 回答阅读 11796
就是输入了一堆成绩,题目的要求是要计算优秀率和合格率,大于等于85的算优秀,大于等于60分的算合格。求代码,不需要解释步骤,我都知道步骤但不知道怎么编程赋值数组TTbr谢谢
最佳回答
在VB中,你可以用一个变量来记录总分,另一个变量记录合格分数和优秀分数。通过遍历成绩,统计达到合格分数和优秀分数的人数,再除以总人数,得到合格率和优秀率。代码示例如下:
Dim total, pass, excellent As Integer
For Each score In scores
If score >= 60 Then
pass = pass + 1
If score >= 90 Then
excellent = excellent + 1
End If
End If
Next
total = scores.Length
Debug.Print "合格率: " & pass / total * 100 & "%"
Debug.Print "优秀率: " & excellent / total * 100 & "%"
声明:本文内容由互联网用户自发贡献自行上传,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任。如果您发现有涉嫌版权的内容,欢迎发送邮件至:service@bkw.cn 进行举报,并提供相关证据,工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。