单击命令按钮后,下列程序代码的执行结果是______。Public Sub fun (Byval a () As Integer)Static n As IntegerDoa(n) = a (n) + a(n + 1)n = n + 1Loop While n < 3End SubPrivate Sub command1_ click()Dim m As Integer, n As Integer, a(10) As IntegerFor n = 0 To 2: a(n) = n + 1: Next nFor n = 1 To 2: Call fun(a): Next nFor n = 0 To 3: Print a(n): Next nEnd Sub