按键精灵 多维数组赋值
最新回答
一口醉
2024-11-22 13:56:13
Dim a(10, 2)
Randomize
For i = 0 To 9
a(i, 0) = Int(1280* Rnd + 1)
a(i, 1) = Int(720* Rnd + 1)
Next
For i = 0 To 9
TracePrint a(i, 0)&","&a(i, 1)
Next
a(i, 0)为x坐标，a(i, 1)为y坐标
热门标签
