请教临时表可以用upfate吗？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我以为代码数据能正常出来就是有点耗时谢谢帮我优化一下代码或者有啥好办法提高速度感谢

Dim exp1 As String = "单据状态='已审核' and 单据类别='横机'"

Tables(e.form.Name & "_Table1").fill("selec 加工商名称,产品名称,产品规格,产品型号,sum(发出数量) as 计划数,0 as 已交货数量, 0 as 未交货数量,状态,可超出比例,'' As 是否已完成,开单时间 from {加工计划明细} where " & exp1 & " group by 加工商名称,产品名称,产品规格,产品型号,状态,可超出比例,是否已完成,开单时间","wjhansdata",True)

Tables(e.form.Name & "_Table1").DataTable.DataCols("开单时间").SetDateTimeFormat(DateTimeFormatEnum.DateTime)

With Tables(e.form.Name & "_Table1")

.MergeMode = MergeModeEnum.Standard

.MergeCols.Clear()

.MergeCols.Add("加工商名称")

.MergeCols.Add("产品名称")

.MergeCols.Add("产品规格")

.MergeCols.Add("产品型号")

.MergeSort = "加工商名称,产品名称,产品规格,产品型号"

.AllowMerge = True

End With

If Tables(e.form.Name & "_Table1").rows.count=0

Tables(e.form.Name & "_Table1").GrandTotal = False

Else

Tables(e.form.Name & "_Table1").Cols("计划数").GrandTotal = True

Tables(e.form.Name & "_Table1").Cols("已交货数量").GrandTotal = True

Tables(e.form.Name & "_Table1").Cols("未交货数量").GrandTotal = True

Tables(e.form.Name & "_Table1").GrandTotal = True '显示合计模式

End If

Dim exp As String

For Each dr As Row In Tables(e.form.Name & "_Table1").rows

exp="单据类别='横机' and 加工商名称='" & dr("加工商名称") & "' And 产品名称='" & dr("产品名称") & "' And 产品规格='" & dr("产品规格") & "' And 产品型号='" & dr("产品型号") & "'"

dr("已交货数量")=DataTables("加工收发明细").SQLCompute("Sum(收回数量)",exp)

主题：请教 临时表可以用upfate吗？

主题：请教临时表可以用upfate吗？