![[填空题] 窗体上有一个名称为Text 1的文本框和一个名称为Command l、标题为“计算”的命令按钮，如图所示。函数fun及命令按钮的单击事件过程如下，请填空。 Private Sub C,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E7%AA%97%E4%BD%93%E4%B8%8A%E6%9C%89%E4%B8%80%E4%B8%AA%E5%90%8D%E7%A7%B0%E4%B8%BAText+1%E7%9A%84%E6%96%87%E6%9C%AC%E6%A1%86%E5%92%8C%E4%B8%80%E4%B8%AA%E5%90%8D%E7%A7%B0%E4%B8%BACommand+l%E3%80%81%E6%A0%87%E9%A2%98%E4%B8%BA%E2%80%9C%E8%AE%A1%E7%AE%97%E2%80%9D%E7%9A%84%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%EF%BC%8C%E5%A6%82%E5%9B%BE%E6%89%80%E7%A4%BA%E3%80%82%E5%87%BD%E6%95%B0fun%E5%8F%8A%E5%91%BD%E4%BB%A4%E6%8C%89%E9%92%AE%E7%9A%84%E5%8D%95%E5%87%BB%E4%BA%8B%E4%BB%B6%E8%BF%87%E7%A8%8B%E5%A6%82%E4%B8%8B%EF%BC%8C%E8%AF%B7%E5%A1%AB%E7%A9%BA%E3%80%82%E3%80%80%E3%80%80Private+Sub+C.png "[填空题] 窗体上有一个名称为Text 1的文本框和一个名称为Command l、标题为“计算”的命令按钮，如图所示。函数fun及命令按钮的单击事件过程如下，请填空。 Private Sub C,第1张")
[填空题] 窗体上有一个名称为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
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）