作业帮 > 数学 > 作业

VB:产生20个30到50之间的随机数,并以每行4个进行排列.要求代码尽可能简洁易懂,

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/21 06:37:42
VB:产生20个30到50之间的随机数,并以每行4个进行排列.要求代码尽可能简洁易懂,
Private Sub Command1_Click()
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