vb编程题求解~万分感谢~
vb编程题求解~万分感谢~
日期:2012-09-13 09:31:47 人气:1
Dim s(1 To 5) As Integer
Private Sub Command1_Click()
lblra.Caption = ""
For i = 1 To 5
s(i) = Int(Rnd * 90) + 10
lblra.Caption = lblra.Caption & s(i) & " "
Next
End Sub
Private Sub Command2_Click()
lblre.Caption = ""