运行下列程序,单击Cmd1,窗体上显示的第一行内容是 ,第二行内容是 ,第三行内容是 Option Explicit Private Sub Cmd1_Click( ) Dim i As Integer,s As Integer For i=1 To 9 Step 3 s= fun( (i )) + fun( i) Print s Next i End Sub Private Function fun( m As Integer) As Integer Static a As Integer If m Mod 2= 0 Then a =a + 1 m =m + 1 Else a = a +2 m = m +2 End If fun = a + m Print fun End Function