vb求两矩阵的和

随即产生两个矩阵，求它们的和与差
输出格式如下
A矩阵为 B矩阵为
12 34 56 78 1 3 5 7
12 54 67 89 1 3 4 5
12 32 45 98 9 6 4 7
C矩阵为 D矩阵为
用print 做 很急 谢谢

在窗体上放4个Label，标题属性设为空。复制如下代码：
Dim A1(1 To 4, 1 To 4)
Dim A2(1 To 4, 1 To 4)

Private Sub Form_Load()
Dim He As Integer, Ca As Integer
He = 0
Ca = 0
Randomize (Timer)
For i = 1 To 4
For j = 1 To 4
A1(i, j) = Int(Rnd * 91 + 10)
Next j
Next i
For i = 1 To 4
For j = 1 To 4
A2(i, j) = Int(Rnd * 9 + 1)
Next j
Next i
For i = 1 To 4
For j = 1 To 4
Label1.Caption = Label1.Caption & A1(i, j) & " "
Label2.Caption = Label2.Caption & A2(i, j) & " "
Label3.Caption = Label3.Caption & A1(i, j) + A2(i, j) & " "
Label4.Caption = Label4.Caption & A1(i, j) - A2(i, j) & " "
Next j
Label1.Caption = Label1.Caption & Chr(13) & Chr(10)
Label2.Caption = Label2.Caption & Chr(13) & Chr(10)
Label3.Caption = Label3.Caption & Chr(13) & Chr(10)
Label4.Caption = Label4.Caption & Chr(13) & Chr(10)
Next i
End Sub