在窗体上画一个名称为Command1的命令按钮，并编写如下程序： Function Fun(x) y=0 If x＜10Then y=x Else y=y+10 End If Fun=y End Function Private Sub Command1_

admin2019-04-29 105

问题在窗体上画一个名称为Command1的命令按钮，并编写如下程序：
Function Fun(x)
y=0
If x＜10Then
y=x
Else
y=y+10
End If
Fun=y
End Function
Private Sub Command1_Click()
n=InputBox("请输入一个数"):n=Val(n)
P=Fun(n):PrintP
End Sub
运行程序，单击命令按钮，将显示输入对话框，如果在对话框中输入100，并单击“确定”按钮，则输出结果为

选项 A、10
B、100
C、110
D、出错信息