vb设计！怎么设置图形框每行输出十个数啊

Question

产生100个20～100之间的随机整数，赋予A数组。在图形框中每10个输出该数组，在标签框中输出数组元素中的最大值、最小值。 现在可以算出来。但它显示就是100个数挤一行去了😭

Answer 1

图形框，这里我用的是Picture，每一列显示10个数字，逢10换行

题主可以参考一下

代码

Option Base 1
Option Explicit

Private Sub Command1_Click()
Dim a(10, 10) As Integer
 Dim i As Integer, j As Integer
 For i = 1 To 10
    For j = 1 To 10
        a(i, j) = Int(Rnd * 80) + 20
        Picture1.Print a(i, j);
    Next j
    Picture1.Print
 Next i
 
End Sub

代码效果

若回答解决了问题，还请题主予以采纳