编写如下程序：Private Sub Command1_Click() Dim a(3， 3)As Integer Dim s As Integer For i＝1 To 3 For j＝1 To 3 a(i， j)＝i * j＋i Next j Next i s＝0 For i＝1 To 3 s＝s＋a(i， 4－i) Next i Print sEnd Sub程序运行后，单击命令按钮Command1，输出结果为( )。