给出下列程序代码,在单击命令按的输出结果是________。 Private Sub Command1_Click ( ) Dim x As Integer, y As Integer x=1:y=1 For n=1 TO 3 z=FirstFunc (x, y) Print n, z , Next n End Sub Private Function FirstFunc (x As Integer, y As Integer) As Integer Dim n As Integer Do While n <= 4 x=x+y n=n+1 Loop FirstFunc=x End Function