我在组合两个统计报表时出现如下问题,请大侠给点帮助,谢谢!!
If s > "" And s1 > "" Then
Dim d1 As Date =Forms("月报表2").Controls("DateTimePicker1").value
Dim d2 As Date =Forms("月报表2").Controls("DateTimePicker2").value
Dim sql0 As String = "Select * FROM {日常废品录入} where {日常废品录入}.录入时间 between '" & d1 & "' and '" & d2 & "' and {日常废品录入}.生产线f in (" & s & ") and substring({日常废品录入}.材质规格f,1,2) in (" & s1 & ") and {日常废品录入}.发生工序 <> '成工退废' and {日常废品录入}.发生工序 <> '长征退废' "
Dim b As New CrossTableBuilder("统计表1",sql0, "yun")
b.HGroups.AddDef("货品编号")
b.VGroups.AddDef("废品原因","内废原因_{0}")
b.Totals.AddDef("废品数量")
b.HorizontalTotal = True
b.VerticalTotal = True
b.Filter = "[废品原因]<> '回用'"
Dim dt As fxDataSource
b.FromServer = True
dt=b.BuildDataSource()
MessageBox.Show("1")
Dim sql2 As String = "Select * FROM {日常废品录入} where {日常废品录入}.录入时间 between '" & d1 & "' and '" & d2 & "' and {日常废品录入}.生产线f in (" & s & ") and substring({日常废品录入}.材质规格f,1,2) in (" & s1 & ") and {日常废品录入}.发生工序 = '成工退废' or {日常废品录入}.发生工序 = '长征退废' "
Dim e11 As New CrossTableBuilder("统计表5",sql2, "yun")
e11.HGroups.AddDef("货品编号")
e11.VGroups.AddDef("废品原因","外废原因_{0}")
e11.Totals.AddDef("废品数量")
e11.HorizontalTotal = True
e11.VerticalTotal = True
e11.Filter = "[废品原因] <> '回用'"
Dim dt3 As fxDataSource
e11.FromServer = True
dt3=e11.BuildDataSource()
MessageBox.Show("2")
dt2.Combine("货品编号",dt3,"货品编号")
此主题相关图片如下:未命名.jpg