这样写

Dim sql As String = "select a.反馈完成日 as 日期, a.样办数量 as 计划, b.样办数量 as 反馈 from (" & sql4 & ") as a inner join (" & sql5 & ") as b on a.反馈完成日=b.反馈完成日"

我稍稍改了一下，运行正常了，具体如下：

 
此主题相关图片如下：123.png

查询结果如下：

此主题相关图片如下：12345.jpg
 

怎么才能将“计划出办期”与“反馈出办期”合并到同一列中呢？

字段名自行修改

Dim sql1 As String = "select 反馈完成日 as 日期, 样办数量 as 反馈, 0 as 计划 from (" & sql4 & ") union all select 计划完成日, 0, 样办数量 from (" & sql5 & ")"

Dim sql2 As String = "select 日期, sum(反馈) as 反馈, sum(计划) as 计划 from (" & sql1 & ") group by 日期"

还是不行；换个问法

此主题相关图片如下：截屏图片.jpg

如何把上面的表格用SQL转换成下面这个表格？

重新看7楼代码，代码没有问题，思路一样。

如果还不会写，请把【样办排期计划】表上传上来测试。

Dim sql1 As String = "select 反馈出办期, 反馈数量, 反馈办单数, 0 as 计划数量, 0 as 计划办单数 from (" & sql4 & ") union all select 计划出办期, 0, 0, 计划数量, 计划办单数 from (" & sql5 & ")"

Dim sql2 As String = "select 反馈出办期, sum(反馈数量) as 反馈数量, sum(反馈办单数) as 反馈办单数, sum(计划数量) as 计划数量, sum(计划办单数) as 计划办单数  from (" & sql1 & ") group by 反馈出办期"

上传样办排期表实例

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:sql合并字段查询.foxdb