...最大不能超过10,最小不等低于0,必须为整数?

发布网友发布时间：2024-03-04 06:54

共1个回答

热心网友时间：2024-07-22 15:26

Sub m()

arr1 = Array(0, 2, 4, 6, 8)

arr2 = Array(1, 3, 5, 7, 9)

For i = 1 To 100

Randomize

r1 = Int(5 * Rnd())

Cells(i, 1) = arr1(r1) 'A列

Randomize

r2 = Int(5 * Rnd())

Cells(i, 2) = arr2(r2) 'B列

End Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com