VB:产生20个30到50之间的随机数，并以每行4个进行排列。 要求代码尽可能简洁易懂，谢谢！
最新回答
大神说不管屌丝多帅都滚开
2024-11-24 09:58:36
Randomize
For i = 1 To 20
a = Int(Rnd() * 21 + 30)
Print a;
If i Mod 4 = 0 Then Print
Next
End Sub
这里的区间是[30,50]
如果是[30，50)请将上面的21改为20
依旧殇心
2024-11-24 10:44:08
Randomize
For m = 1 To 5'外部循环共输出5行
For i = 1 To 4 '内部循环 每输出4个数字换行
a = Int(Rnd() * 21 + 30)
Print a;
Next
Print '换行打印
Next
End Sub
热门标签
