Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表达式代码问题


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

主题：表达式代码问题
帅哥哟，离线，有人找我吗？
yuyijun2
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1103 威望：0 精华：0 注册：2013/7/5 11:29:00 		表达式代码问题  发帖心情 Post By：2013/8/23 9:51:00 [只看该作者]

 

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

 

上面的红色代码如何再加入统计条件？例如在加入橙色部分的条件,让“投诉案”=部门查办的投诉类案件
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/8/23 9:56:00 [只看该作者]

dr("查办案件总数")= DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "' and 投诉案='部门查办'"  )

 回到顶部
帅哥哟，离线，有人找我吗？
yuyijun2
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1103 威望：0 精华：0 注册：2013/7/5 11:29:00 		  发帖心情 Post By：2013/8/23 10:15:00 [只看该作者]

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

 

                      dr("投诉案") = ？
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47497 积分：251403 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2013/8/23 10:18:00 [只看该作者]

dr("查办案件总数")= DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "'" )
dr("投诉案") = DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "' And [案件来源]='投诉'" )

 回到顶部
帅哥哟，离线，有人找我吗？
yuyijun2
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1103 威望：0 精华：0 注册：2013/7/5 11:29:00 		  发帖心情 Post By：2013/8/23 11:00:00 [只看该作者]

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

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

红色部分的代码如何写？
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/8/23 11:02:00 [只看该作者]

拼接一下即可   dr("投诉案") = DataTables("行政案件").Compute("Count(办案部门)", "[办案部门] = '" & dr("办案部门") & "' And [案件来源]='投诉' And [查处时间] >=#" & DateTimePicker1 & " and [查处时间] <=# & DateTimePicker2 & "#“）

 回到顶部
帅哥哟，离线，有人找我吗？
yuyijun2
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1103 威望：0 精华：0 注册：2013/7/5 11:29:00 		  发帖心情 Post By：2013/8/23 11:42:00 [只看该作者]

出现编译错误！
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/8/23 11:43:00 [只看该作者]

DateTimePicker1 如果你这个不是变量名称  那么应该是DateTimePicker1.Value 参与拼接才对哦.

 回到顶部
帅哥哟，离线，有人找我吗？
yuyijun2
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：138 积分：1103 威望：0 精华：0 注册：2013/7/5 11:29:00 		  发帖心情 Post By：2013/8/23 12:30:00 [只看该作者]

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

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/8/23 12:33:00 [只看该作者]

http://www.foxtable.com/help/topics/1962.htm

e.form.controls("DateTimePicker1").Value 

图片点击可在新窗口打开查看

 

看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。
三遍之后才开始做系统，先设计好表，想做什么功能，就做什么功能，遇到问题在帮助找答案，找不到的在论坛提问，不断遇到问题，不断解决问题，慢慢就熟悉了。
此外一定要先掌握《使用指南》，然后再看《开发指南》
 回到顶部
总数 16 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 4 次数据查询