[填空题] 窗体上有一个名称为Text 1的文本框和一个名称为Command l、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。   Private Sub C

16 查阅

[填空题] 窗体上有一个名称为Text 1的文本框和一个名称为Command l、标题为“计算”的命令按钮,如图所示。函数fun及命令按钮的单击事件过程如下,请填空。   Private Sub Command 1 _Click()  Dim x As Integer  x=Val(InputBOX("输入数据"))  Text 1=Str(fun(x)+fun(x)+fun(x))  End Sub    Private Function fun(ByRef n As Integer)  If n Mod 3=0 Then  n=n+n  Else  n=n*n  End If  _【9】_=n  End Function  当单击命令按钮,在输入对话框中输入2时,文本框中显示的是_【10】_

参考答案:

fun

计算机考试