Foxtable(狐表)用户栏目专家坐堂 → 统计时,转换成数据类型失败


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

主题:统计时,转换成数据类型失败

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


加好友 发短信
等级:小狐 帖子:394 积分:4041 威望:0 精华:0 注册:2017/3/24 15:10:00
统计时,转换成数据类型失败  发帖心情 Post By:2018/3/21 21:53:00 [只看该作者]

Dim fxlb As WinForm.ComboBox = e.Form.Controls("分校列表")
Dim i As Integer=1
Dim g As New sqlCrossTableBuilder("统计表2", "报名缴费")
g.C
'g.AddTable("分校","分校编号","报名缴费","分校编号")
g.HGroups.AddDef("所属分校")
'g.HGroups.AddDef("经营形式")
g.Vgroups.AddDef("制单人")  
g.Totals.AddDef("缴费编号", AggregateEnum.Count, "人数")
g.Totals.AddExp("收费合计", "收费合计 - 材料费")
'g.Totals.AddDef("欠缴金额", "欠缴金额")
'g.Totals.AddDef("补缴金额", "补缴金额")
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180321215346.png
图片点击可在新窗口打开查看
g.Filter = "所属分校 Not Like '%测试分校%' And  所属分校='" & fxlb.value & "' And 制单人 > 0 And year(缴费日期)>=2018 "
g.Build()
Tables(e.Form.name & "_table5").DataSource=g.BuildDataSource
Tables(e.Form.name & "_table5").AutoSizeCols()

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/21 23:23:00 [只看该作者]

修改红色代码

 

g.Filter = "所属分校 Not Like '%测试分校%' And  所属分校='" & fxlb.value & "' And 制单人 is not null And year(缴费日期)>=2018 "

 回到顶部