Vb数据库中某列求和，就是统计核算

添加一个Adodc控件，命名Adodc2

Adodc2.ConnectionString = "provider=microsoft.jet.oledb.4.0data source=" &App.Path &"\vb_data.mdb"

Adodc2.RecordSource = "select sum(营业收入) as 营业收入和 from zhangdan"

Adodc2.Refresh

Label6.Caption = Adodc2.Recordset.Fields("营业收入和")

用SQL语句:

前面连接数据库的语句就不列了..

查询用这个:

select sum(列名) as 汇总数据 from XXX where XXXX

然后取 汇总数据 的值就行了

=rs.fields(0).value

---