Question

vb datagrid中如何获得一列值的和

我想把datagrid中金额那一列的数据相加，在显示在label7上.

Answer 1

Adodc1.Recordset.MoveFirst
Lcount = 0
Do Until Adodc1.Recordset.EOF
Lcount = Lcount + Adodc1.Recordset("金额")
Adodc1.Recordset.MoveNext
Loop
Label7.Caption = Lcount

Answer 2

Private Sub Command1_Click()
For Count = 0 To Adodc2.Recordset.RecordCount - 1
Lcount = Lcount + Val(DataGrid2.Column("商品消费总数").Text)
DataGrid2.Row = DataGrid2.Row+1

Next Count
End Sub

其实datagrid的一列值就是adodc.recordset的一列值，
可以用sql语句select sum("列名") from table取得。
打字不易，如满意，望采纳。

追问

这怎么回事啊