在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:
Private Sub Command1 Click()
Dim intNum As Integer
intNum=InputBox("请输入:")
MsgBox f(intNum)
End Sub
Function f(X As Integer)As Integer
f=IIf(X<10,X,X+5)
End Function
运行程序,单击命令按钮,在输入对话框中输入5,则程序的输出结果为______。
订单号:
遇到问题请联系在线客服
订单号:
遇到问题请联系在线客服