我想把月租停车、临时停车、其他收入的数据都组合都同一个表中安月统计，安年分组汇总，最后总计，如果其他收入没有数据表上数据显示为空，月租停车的数据是经过数据处理的临时表，临时停车和其他收入的数据在缴费情况表中，现在这样写红色标注报错：
With Tables("安费用所属期查询统计_Table1")
.SubtotalGroups.Clear()
LockBaseMainForm() '锁定主界面
.StopRedraw()
Dim bc As New GroupTableBuilder("统计表2",dt)
Dim dt1 As fxDataSource
bc.FromServer = True
bc.Filter = "[查询_月租_所属日期] >= #" & e.Form.Controls("StartDate").Value & "# And [查询_月租_所属日期] <= #" & e.Form.Controls("EndDate").Value & "#"
bc.Groups.AddDef("查询_月租_所属日期",DateGroupEnum.Year,"年")
bc.Groups.AddDef("查询_月租_所属日期",DateGroupEnum.Month,"月")
bc.Totals.AddDef("查询_月租_缴费金额")
dt1 = bc.BuildDataSource()
Dim bc1 As New SQLGroupTableBuilder("统计表3",DataTables("缴费情况"))
Dim dt2 As fxDataSource
bc1.FromServer = True
bc1.Filter = "[日期] >= #" & e.Form.Controls("StartDate").Value & "# And [日期] <= #" & e.Form.Controls("EndDate").Value & "#"
bc1.Groups.AddDef("日期",DateGroupEnum.Year,"年")
bc1.Groups.AddDef("日期",DateGroupEnum.Month,"月")
bc1.Totals.AddDef("缴费_临时停放_缴费金额")
bc1.Totals.AddDef("缴费_其他收入_金额")
dt2 = bc1.BuildDataSource()
dt1.Combine("年,月",dt2,"年,月") '将销售统计数据组合到进货统计数据
dt1.Show("统计表2")
.DataSource = dt1.BuildDataSource()
Dim g1 As New Subtotalgroup
g1.GroupOn = "年" '分组列为客户列
g1.TotalOn = "查询_月租_缴费金额" '对数量和金额进行统计
g1.Caption = "{0} 本年累计"
.SubtotalGroups.Add(g1)
'定义总计分组
g2 = New Subtotalgroup
g2.GroupOn = "*"
g2.TotalOn = "查询_月租_缴费金额"
.SubtotalGroups.Add(g2)
.Subtotal() '生成汇总模式
.DataTable.DataCols("查询_月租_缴费金额").SetFormat("#,###.##")
'.SetColVisibleWidth("年|40|月|30|分类|60|住址_巷|60|住址_号|30|住址_房|30|姓名|50|手机号码|80|车牌号码|70|查询_月租_缴费金额|70")
.SetHeaderRowHeight(0,25,25)
.ResumeRedraw()
UnLockBaseMainForm() '解锁主界面
End With
End If
[此贴子已经被作者于2021/12/4 14:21:58编辑过]
加好友 
发短信
Post By：2021/12/3 17:48:00 [显示全部帖子]
此主题相关图片如下：qq图片20211203211609.png
，不知怎么处理！