主题：SELECT问题

如图
此主题相关图片如下：无标题1.jpg

红色线不对，绿色线对，下面还有类似的情况
此主题相关图片如下：无标题1.jpg

要不都对，要不都不对，这下可好，有的对，有的不对，就糊涂了。

 代码

 

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Select *, (select top 1 供应商 from {采购明细} b where a.型号=b.型号) as 供应商 FROM {出库} a"
dt = cmd.ExecuteReader()
'对临时进行分组统计
Dim b As New CrossTableBuilder("统计表111",dt)
b.HGroups.AddDef("供应商")
b.HGroups.AddDef("型号")
b.VGroups.AddDef("出库日期","{0}月")
b.Totals.AddDef("出库数量")
b.HorizontalTotal = True
b.VerticalTotal = True
Tables("采购管理_Table2").DataSource = b.BuildDataSource()

有点甜，牛啊，我再琢磨下，是有重复值吗，请告诉我原因好吗

 

嗯嗯，是有重复值。你把SQL语句执行一次看结果

 

http://www.foxtable.com/help/topics/1484.htm

 

有重复值的事我还没想明白，但结果就是如此，以后记得加个DISTINCT好像也可以，请注意看两张图的数量和图下面不同SQL的语句。

另外，自己做的窗口怎么才能加个SQL执行窗口呢

怎么发不了图

 你想做一个模拟执行sql的窗口？

 

 你可以这样写，红色代码，换成你对应的sql语句

 

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.CommandText = "Select *, (select top 1 供应商 from {采购明细} b where a.型号=b.型号) as 供应商 FROM {出库} a"
dt = cmd.ExecuteReader()

 

Tables("采购管理_Table2").DataSource = dt

谢谢有点甜。我的图怎么没法传了