以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  最大值问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=94291)
--  作者：xvkewen
--  发布时间：2016/12/20 17:18:00
--  最大值问题

Foxtable中的MATH.MAX函数只可以比较两个数据的最大值，有没有可以比较多个数最大值及最小值比较方便的办法？

 

如求出5个整数中最大值和最小值？求5个日期中的最早的日期与最晚的日期？
--  作者：有点色
--  发布时间：2016/12/20 17:38:00
--  

写个内部函数，然后调用

 

http://www.foxtable.com/webhelp/scr/1486.htm

 

Dim max As double = -999
For Each n As Double In args
    If n > max Then
        max = n
    End If
Next
Return max

 

调用

 

dim max = Functions.Execute("mymax", 1，3，5，7，9，2，4，15，14)
msgbox(max)