UC知道用function函数来实现任意两个数字之间的大小比较
来源：百度知道 编辑：UC知道 时间：2024/06/23 20:44:23
用function函数来实现任意两个数字之间的大小比较，并输出结果！谢
各位大大，不用窗体的。。直接用vbs格式文件执行的。。5555555
各位大大，不用窗体的。。直接用vbs格式文件执行的。。5555555
窗体上放一个命令按纽代码如下
Private Sub Command1_Click()
Dim a, b As Double
a = InputBox("输入一个数a")
b = InputBox("输入一个数b")
nn a, b
End Sub
Function nn(a, b As Double)
If a > b Then MsgBox a & ">" & b Else MsgBox a & "<" & b
End Function
窗体上放一个命令按纽,然后复制下面代码，运行即可。
Option Explicit
Function Max(a, b)
Max = IIf(a > b, a, b)
End Function
Private Sub Command1_Click()
MsgBox "20与31两数的最大值是：" & Max(20, 31)
End Sub