请写出单击窗体后，窗体上的显示结果。 Private Sub Form_Click() Dim a(5) As Byte, i As Byte a(0) = 1 For i = 1 To 5 a(i) = a(i - 1) + i: Print a(i); Next i End Sub