事件是用什么？
Private Sub Command5_Click()
Dim b(10) As Integer, i
Randomize
For i = 1 To 10
b(i) = Int(Rnd * (99 - 10 + 1) + 10)
Next i
Call bnim(b())
End Sub
Private Sub bnim(ByRef a() As Integer)
Dim i, j As Integer
j = a(1)
For i = 1 To 10
If j > a(i) Then
j = a(i)
End If
Next i
Print j
End Sub
我用的控件是command,事件是click你自己看一下吧
