作业帮 > 数学 > 作业

用VB做:通过随机产生20到40之间的整数形成4*5的矩阵

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/17 04:14:07
用VB做:通过随机产生20到40之间的整数形成4*5的矩阵
1. 窗体上加一个label 控件
2.
Private Sub Form_Load()
Dim MyValue
Dim i, j
Label1.Caption = ""
For i = 1 To 5
For j = 1 To 4
Randomize
MyValue = Int((40 * Rnd) + 20) ' 生成 20 到 40 之间的随机数值
Label1.Caption = Label1.Caption & " " & MyValue
Next j
Label1.Caption = Label1.Caption & " " & Chr(13)
Next i
End Su