我想打印个3*3的矩阵。要求：在inputbox中一个个输入矩阵各元素的值，然后让矩阵显示在文本框里或者打印在窗口上也行，麻烦大虾们帮个忙！谢谢！

Private Sub Command1_Click()
    Dim Iarray(3, 3), i, j As Integer
    For i = 0 To 2
        For j = 0 To 2
            Iarray(i, j) = Val(InputBox("请输入第" & i + 1 & "个数"))
        Next j
    Next i
    For i = 0 To 2
        For j = 0 To 2
            Print Iarray(i, j);
        Next j
        Print
    Next i
End Sub