Foxtable(狐表)用户栏目专家坐堂 → 指定列的最大日期怎么求?


  共有6711人关注过本帖树形打印复制链接

主题:指定列的最大日期怎么求?

帅哥哟,离线,有人找我吗?
jijianjsj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:268 积分:2227 威望:0 精华:0 注册:2013/2/4 11:02:00
  发帖心情 Post By:2013/4/19 17:19:00 [显示全部帖子]

max是比较2个数吧,帮助中有个用自定义函数的例子

增加一个自定义函数,名称为Max,代码为:

Dim MaxVal As Double = Args(0)
For
i As Integer = 1 To Args.Length - 1
    MaxVal = Math.Max(MaxVal,Args(i))
Next
Return
MaxVal

该自定义函数可以比较任意个数的参数,并返回最大的一个,例如在命令窗口执行:

Output.Show(Functions.Execute("Max",1,3,5,7,9))

即可显示13579几个数值中的最大数9



希望对你有用~!


 回到顶部
帅哥哟,离线,有人找我吗?
jijianjsj
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:268 积分:2227 威望:0 精华:0 注册:2013/2/4 11:02:00
  发帖心情 Post By:2013/4/19 19:24:00 [显示全部帖子]

唉,我帮你改良了一下,还是自定义函数
Dim MaxVal As Date = Args(0)
For i As Integer = 1 To Args.Length - 1
    If DateDiff("d", MaxVal, Args(i)) > 0 Then
        MaxVal = Args(i)
    End If
Next
Return MaxVal

测试过了,应该没问题了
[此贴子已经被作者于2013-4-19 19:24:25编辑过]

 回到顶部