在窗体上添加一个命令按钮(名为Command1),然后编写如下程序:
Function m(x as Integer,y as Integer) as Integer
m=IIf(x>y,x,y)
End Function
Private Sub Command1_Click()
Dim a as Integer,b as Integer
a=1
b=2
MsgBox m(a,b)
End Sub
打开窗体运行后,单击命令按钮,消息框的输出结果为【 】
订单号:
遇到问题请联系在线客服
订单号:
遇到问题请联系在线客服