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

Question

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

Answer 1

'第一个函数function max(a,b)if a>b thenmax=aelsemax=bend ifend function'第二个函数function min(a,b)if a<b thenmin=aelsemin=bend ifend function '调用msgbox "5,10,的最大值是:" & max(5,10)msgbox "5,10 的最小值是:" & min(5,10)