以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- FILTER里日期的写法 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=107752) |
-- 作者:dengk03 -- 发布时间:2017/10/9 12:48:00 -- FILTER里日期的写法 For i As Integer = 0 To m-1 \'指定每个数据点的位置 Series.X(i) = i \'指定水平坐标 s = DataTables("1").sqlcompute("面积","完成人= \'"& text &"\' And 时间 >= \'i/1/2017\' And 时间 <= \'i/31/2017\'") Series.Y(i) = s \'垂直坐标用随机数生成 Next 时间 >= \'i/1/2017\' 这一段的正确写法是什么?
|
-- 作者:有点甜 -- 发布时间:2017/10/9 14:16:00 -- For i As Integer = 0 To m-1 \'指定每个数据点的位置 Series.X(i) = i \'指定水平坐标 Dim d As Date = new Date(2017, i+1, 1) msgbox(d) s = DataTables("1").sqlcompute("面积","完成人= \'"& text &"\' And 时间 >= \'" & d & "\' And 时间 < \'" & d.AddMonths(1) & "\'") Series.Y(i) = s \'垂直坐标用随机数生成 Next |