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)
加好友 
发短信
Post By：2019/4/7 10:16:00 [显示全部帖子]
