以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何求日期最大值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133102)

--  作者:chh2321
--  发布时间:2019/4/6 19:41:00
--  [求助]如何求日期最大值
老师,
有表1,表2,表3和表4,每张表中有日期列,但日期列名称不同(假设四张表日期列分别为“a日期”,“b日期”,“c日期”,“d日期”),现在我想比较表1,表2和表3的日期,把其中最大日期值填入表4日期列中,并实时更新,请问分几步处理,需要在哪些项目和表事件中写代码?用compute(Max())可以解决问题吗,compute(max())好像日期名称相同才可以吧?

--  作者:有点甜
--  发布时间:2019/4/7 10:16:00
--  

1、用compute分别计算各个表的最大值。得到四个值,max1、max2、max3、max4

 

2、分别比较4个值的最大值,如

 

Dim max As Double = 0

max = math.Max(max1, max2)

max = math.max(max, max3)

max = math.max(max, max4)

 

msgbox(max)