以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  报错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=161186)

--  作者:rgbjwjb
--  发布时间:2021/3/9 12:37:00
--  报错
我想通过选择年度和月份,实现指定月份的统计,下面的代码运行后报错,请问哪里需要修改?请指教,谢谢!
Dim ndxz As WinForm.ComboBox = e.Form.Controls("年度选择")
Dim yfxz As WinForm.ComboBox = e.Form.Controls("月份选择")
Dim g As New GroupTableBuilder("统计表1", DataTables("派工单明细表"))
Dim dt As fxDataSource
g.Groups.AddDef("派工日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("村民组")
g.Groups.AddDef("户主姓名")
g.Totals.AddDef("工时")
g.Totals.AddDef("工价")
g.VerticalTotal = True
g.Decimals = 2
g.Filter = "[派工日期] >= #" & yfxz.value & "/1/" & ndxz.value & "# And [派工日期] <= #" & yfxz.value & "/31/" & ndxz.value & "#"
g.Build()
dt = g.BuildDataSource()
Tables("公用工查询_Table1").DataSource = dt

--  作者:有点蓝
--  发布时间:2021/3/9 14:11:00
--  
参考:http://www.foxtable.com/webhelp/topics/2720.htm