- 博客(2)
- 收藏
- 关注
原创 随机生成10个随机数并排序
Dim a(1 To 10) As IntegerPrivate Sub Command1_Click()Form_LoadEnd SubPrivate Sub Form_Load()Dim p As String 'p用来显示随机生成的10个随机数Randomize p = ""For i = 1 To 10 '生成10个随机数Dox = Int(Rn
2012-05-16 15:46:05 2864
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人