vbs如何自定义两个以上的函数?

Question

vbs如何自定义两个以上的函数

Answer 1

'第一个函数function max(a,b)
if a>b then
max=a
else
max=b
end if
end function'第二个函数function min(a,b)
if a<b then
min=a
else
min=b
end if
end function '调用msgbox "5,10,的最大值是:" & max(5,10)
msgbox "5,10 的最小值是:" & min(5,10)