运行效果：
程序代码：
Private Const general = 5
Private Sub Command1_Click()
Dim myarray(general - 1) As Integer
For i = 0 To general - 1
myarray(i) = Int(Rnd * 90) + 5
Print myarray(i)
Next i
End Sub
运行效果：
程序代码：
Private Const general = 5
Private Sub Command1_Click()
Dim myarray(general - 1) As Integer
For i = 0 To general - 1
myarray(i) = Int(Rnd * 90) + 5
Print myarray(i)
Next i
End Sub
![美团网副总裁王慧文：所谓“农村包围城市”是一个误解[图]](data:image/gif;base64,R0lGODlhAQABAIAAAP///wAAACwAAAAAAQABAAACAkQBADs=)