[求助]查询表的并列问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我做了一个查询表，一旦我执行这段代码，生成的查询表就会覆盖掉我以前打开的数据表，如何编写代码可以做到生成的查询表与我之前打开的数据表并列，而不是覆盖打开的数据表：代码如下：

Dim dt As Table = Tables("病症总分析报表")

Dim r As Row =dt.Current

Dim SQLText As String

SQLText = " S elect a.采购状态,a.销售状态,a.商品状态,a.商品编码,a.商品名称,a.规格,a.厂家, "

SQLText += " a.单位,a.个性标识,a.结算户,a.最新进价,a.商品结构码,a.加盟店强效分类,a.商品替代码, "

SQLText += "a.直营店批发价,a.直营零售价,a.客户价,a.原加盟售价,a.县长价,a.龙山售价,a.直营奖金, "

SQLText += " a.纯利,a.购进毛利,a.公司库存,a.门店总库存,a.直营总库存,a.病症功能编码,a.病症功能名称, "

SQLText += " a.商品辅助码,a.原加盟店配送价,a.新特药强效分类,a.带店加盟非县长配送价,b.数量,b.成本,b.金额,(b.金额-b.成本) As 毛利额, "

SQLText += "Case when c.总销售金额 = 0 Then 0 Else b.金额/c.总销售金额 End As [占总销售额%], "

SQLText += "Case when c.总销售毛利额 = 0 Then 0 Else (b.金额-b.成本)/c.总销售毛利额 End As [占总销售毛利额%] f rom 商品综合信息表 a ,病症商品明细信息 b "

SQLText += " left join 病症总分析报表 c on b.病症功能编码 = c.病症功能编码 where a.商品编码 = b.商品编码 And b.用户ID = '"& SYS.Login.UserID &"' and b.病症功能编码 = '" & r("病症功能编码") & "'"

Dim q As new QueryBuilder

q.TableName = "病症商品明细信息"

q.TableCaption = "明细信息查询"

q.C

q.SelectString = SQLText

q.Build

'DataTable("病症商品明细信息").OpenTo("A")

MainTable = Tables("病症商品明细信息")

主题：[求助]查询表的并列问题