在窗體上畫一個(gè)名稱為Command1的命令按鈕，然后編寫如下程序：
Private Sub Command1_Click（）
Dim I As Integer，j As Integer
Dim a（10，10）As Integer
For I=1 To 3
For j=1 To 3
a（I，j）=（I-1）*3+j
Print a（I，j）；
Next j
Print
Next i
End Sub
程序運(yùn)行后，單擊命令按鈕，窗體上顯示的是（）。（其中CR表示回車和換行）

在窗體上畫一個(gè)名稱為Text1的文本框和一個(gè)名稱為Command1的命令按鈕，然后編寫如下事件過程：
Private Sub Command1_Click（）
Dim array1（10，10）As Integer
Dim I，j As Integer
For I=1 To 3
For j=2 To 4
array1（I，j）=I+j
Next j
Next I
Text1.Text=array1（2，3）+array1（3，4）
End Sub
程序運(yùn)行后，單擊命令按鈕，在文本框中顯示的值是（）