如何：VB“ADO对象”的方法，access数值汇总求和？急！急！急！

[knownquantity]

我用的是VB！由于MSDN不全，而且看不太懂，所以不得不请教诸位了！
这是我的毕业设计，今天需要做完，还要仰仗诸位大侠了！拜托。
Set aA = New ADODB.Connection '实例化
Set tB1 = New ADODB.Recordset '实例化
Set tB2 = New ADODB.Recordset '实例化
aA.Provider = "microsoft.jet.oledb.4.0"
aA.Open "data source=" & App.Path & "\data\familyaccount.mdb"
tB1.Open "lsxj", aA, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid.DataSource = tB1

tb1=aa.execute "select sum(金额) as ddd from lsxj group by 流水帐"
Text1 = tB1.Fields("ddd").Value

如何把ACCESS中lsxj表中“金额”汇总（求和）并在vb的text1中显示出来呀？
如上语句抱错？ 急！！！

[LichKingSZ]

set tb1=aa.execute "select sum(金额) as ddd from lsxj group by 流水帐"

[Cooly]

Set aA = New ADODB.Connection '实例化
Set tB1 = New ADODB.Recordset '实例化
Set tB2 = New ADODB.Recordset '实例化
aA.Provider = "microsoft.jet.oledb.4.0"
aA.Open "data source=" & App.Path & "\data\familyaccount.mdb"
tB1.Open "lsxj", aA, adOpenDynamic, adLockOptimistic
Set MSHFlexGrid.DataSource = tB1

tB2.open "select sum(金额) as ddd from lsxj", aA, adOpenDynamic, adLockOptimistic
Text1 = tB2.Fields("ddd").Value

[LichKingSZ]

...晕...刚才没有注意看,你要使用GROUP BY,那SELECT 后面只能加 '流水帐'