vb中输入五个数在数组中找出最大数应该如何编程,谢谢

2025-02-24 17:41:45
推荐回答(1个)
回答1:

Private Sub Command1_Click()
Dim i%, m%
Dim a(5) As Integer
m = 0
For i = 1 To 5
a(i) = 10 + Rnd * 90
Print a(i);
If m < a(i) Then m = a(i)
Next i
Print
Print m

End Sub