帮我编写个程序 VB的~

来源:百度知道 编辑:UC知道 时间:2024/09/27 19:14:22
题目是这样的, 编写程序 从键盘输入若干个学生分数,统计并输出最高分与最底分,输出结果 . 大家帮帮忙 谢谢了

OK,我做好啦,我已经试过啦,

首先你在窗体上建立一个命令按钮,代码如下:

Dim b(1 To 20), max!, min!

Private Sub Command1_Click()

For i = -1 To x

a = Val(InputBox(""))

If a = -1 Then Exit For

c = c + 1

b(c) = a

i = i - 1

Next

max = b(1): min = b(1)

For i = 2 To c

If b(i) > max Then max = b(i)

If b(i) < min Then min = b(i)

Next i

Print "你输入的数中最大为:"; max, "最小为:"; min

End Sub

你输入学生分数后,最后按-1才会退出,记住一定要按-1

好啦,不信你可以在VB中做下,就会看到效果啦,不懂发消息问我!