主题：表达式代码问题

 

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("行政案件")) Dim dt1 As fxDataSource bd1.Groups.AddDef("办案部门") '根据办案部门分组 bd1.Totals.AddDef("行政罚款","行政罚款") '对金额进行统计 dt1 = bd1.BuildDataSource() Tables("统计_Table1").DataSource = dt1 '将统计结果绑定到Table   With DataTables("统计_Table1").DataCols  '用表达式列计算库存数据     .Add("投诉案",Gettype(Integer))   .Add("查办案件总数",Gettype(Integer)) End With For Each dr As Row In Tables("统计_Table1").Rows     dr("查办案件总数")= DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "'"  )    dr("投诉案") = DataTables("行政案件").Compute("Count(办案部门)", "[案件来源]='投诉'" )  Next   上面的红色代码如何再加入统计条件？例如在加入橙色部分的条件,让“投诉案”=部门查办的投诉类案件

可以认帮我写出正确的代码吗？

 

                      dr("投诉案") = ？

如果我在当前窗口加入日期控件DateTimePicker1和日期控件DateTimePicker2两个日期变量

   dr("投诉案") = DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "' And [案件来源]='投诉'And[查处时间] ≥DateTimePicker1≤DateTimePicker2“）

红色部分的代码如何写？

出现编译错误！

DateTimePicker1 是当前窗口的控件，应该怎么写

 

 

看了，可是没点头绪

我看了，没点头绪

dr("投诉案") = DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "' And [案件来源]='投诉' And [查处时间] >=e.form.controls("DateTimePicker1").Value  and [查处时间] e.form.controls("DateTimePicker2").Value “）

  我这样写对吗？

   

好像明白了，拼接时不同的数据来源要有特殊的引用符号是这样吗？