- 博客(1)
- 收藏
- 关注
原创 随机生成十个数
Private Sub Command1_Click() Dim a(10) As Integer Dim mystr As String Dim printstr As String a(i) = Int(Rnd() * 100 + 1) printstr = Str(a(1)) mystr = "要" For i = 2 To 10 t = Int(Rnd() * 100 +
2012-05-15 12:42:08 456
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人