首先祝各位快乐。请教一datagrid问题

Question

我用的是adodc+datagrid,查询出的记录已显示在datagrid上
在此基础上，请教如何把查询出的记录字段求和,比如“收入”，
通过命令按钮把符合记录的收入的总合赋给一文本框。
表名  jd 
字段  收入

Answer 1

Private Sub command1_Click()
dim i as integer
adodc1.Recordset.movefirst
while adodc1.Recordset.EOF=false
  i=i+adodc1.recordset("收入")
  adodc1.Recordset.movenext
wend
text1.text=i

Answer 2

同意，差不多就是这样做！你还可以直接用SQL语句做啊，在你用的ADO控件中！！