以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教统计条目数如何规定  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109758)

--  作者:ljh29206
--  发布时间:2017/11/18 19:11:00
--  请教统计条目数如何规定
 例如:
我要统计  从今天起 往前数89条 的 数据  找到最大值

DataTables("股票数据").Compute("max(最高价)",日期 < \'" & Date.Today.AddDays(-89) & "\'")

这样写不对的,由于周六 周日不作统计 ,

请问怎么保证 统计条目数一定是89条?


--  作者:有点甜
--  发布时间:2017/11/19 16:49:00
--  
Dim fdr As DataRow = DataTables("股票数据").find("日期 < #" & Date.Today & "#", "日期 desc", 88)
If fdr IsNot Nothing Then
    msgbox(fdr("日期"))
    DataTables("股票数据").Compute("max(最高价)","日期 < #" & Date.Today & "# amd 日期 >= #" & fdr("日期") & "#")
Else
    msgbox("没有89行数据")
End If