表A窗口按钮运行时间超长,谁可优化时间长度.

要求:使用外部数据源,不加载数据,直接从后台统计.

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

点击浏览该文件:my documents.rar

这样的任务，我也没有好的方法。

自己调整设计思路。

先加载再统计,时间只有一秒.

这样的结果不是一样吗？

时间0.3秒

Dim s As Date = Date.Now()
Dim g As New GroupTableBuilder("统计表1", DataTables("表A"))
g.Groups.AddDef("第二列")
g.Totals.AddDef("第一列", AggregateEnum.Count)
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")
MessageBox.Show((Date.Now -s).TotalSeconds)

我需要在指定表中统计,而不生成新表"统计表1".

这个也不要1秒钟：

Dim a,b As Double
Dim cmd As New SQLCommand
Dim dt As datatable
cmd.Connection Name = "1"
cmd.CommandText = "SELECT * From {表A}"
dt = cmd.ExecuteReader()

a=now.second
For Each dr As Row In Tables("表C")
    dr("第一列") = dt.Compute("Sum(第一列)", "第二列 = \'" & dr("第二列") & "\'")
Next
b=now.second
messagebox.show(b & " " & a & "  " & b-a)

谢谢了.