在vb中定义一个大小为8的数组,用随机函数产生一个范围在10~70之内的整数赋值

2024-11-15 15:18:37
推荐回答(1个)
回答1:

 Dim A(1 To 8) As Integer
 For I = 1 To 8
    A(I) = Int(Rnd() * 61 + 10)
 Next I