编写如下程序：Private Sub Command1_Click() Dim m As Integer， n As Integer n＝2 For m＝1 To 3 Print proc(n)； Next mEnd SubFunction proc(i As Integer) Dim a As Integer Static b As Integer a＝a＋1 b＝b＋1 proc＝a * b＋iEnd Function程序运行后，单击命令按钮Command1，输出结果为( )。