几个计算机VB考试的题目

显示全部楼层 · 2008-12-16 19:40:03

1 利用INPUTBOX框，输入20个学生的成绩，出平均分，并统计高于平均分的人数。
2.单击窗体，随机生成一个N*M的矩阵，矩阵中的所有元素都是10--50的两位整数，并求出矩阵中各行的最大值。
3.产生10个50--100（包括50和100）的随机整数，并用“泡沫排序”按从小到大的顺序输出。
4.设有如下两组数据：
A：2， 5， 8，4，7
B：13， 16，14，17，18
编出程序，分别创建数组A和B，然后数组的对应元素相加，结果放入数组C中并输出。
5.输入20个学生的成绩，统计各个分数段的人数。分数段分隔方法为：0--59分，60--69分，70--79分，80--89分，100分。
知道的说下哈..谢谢了!

千问 · 2008-12-16 19:40:03

只回答一个其他的再提问题我再接着回答 1计算平均分的 Private Sub Form_click() Dim score(20) As Integer, i As Integer, sum As Integer, n As Integer Dim aver As Single sum = 0 For i = 1 To 20 score(i) = Val(InputBox("输入分数:", "数据输入")) sum = sum + score(i) Next aver = sum / 20 Print "平均分:"; aver For i = 1 To 20 If score(i) >= av...

千问 · 2008-12-16 19:40:03

太有才了！才出5分！...