窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,编写如下程序: Private Sub Command1_Click() Dim a As Integer a = InputBox("请输入一个数") Text1.Text = a + fun1(a) + fun1((a)) End Sub Private Function fun1(ByRef x As Integer) If x Mod 5 = 0 Then x = x * x Else x = x + x End If fun1 = x End Function 对于上面的程序代码,以下说法中错误的是( )