vb6.0+win2000+access,fORM1中，求sum并赋值！

Question

vb6.0+win2000+access,fORM1中，求sum并赋值！
问题:如何把"select SUM（FPJE) from fp "合计的结果给：text1.text
Data1.RecordSource = "select SUM（FPJE) from fp "
Data1.Refresh
text1.text=data1.recorderset(0)
我这样做出错了！请指教！

Answer 1

text1.text=data1.recorderset(0)
改为:
text1.text=data1.recorderset.fields(0)
试试

Answer 2

我找到一个办法了：就是：设置TEXT1的属性，DATASOURCE=DATA1，和DATAFIELD=计算合计（备注：Data1.RecordSource = "select SUM（FPJE) as 计算合计 from fp ），然后，Data1.RecordSource = "select SUM（FPJE)AS 计算合计 from fp "
Data1.Refresh
在TEXT1。TEXT中就可以看到计算结果了！