vb 在text中显示access数据库中的某一例数值的总数

来源:百度知道 编辑:UC知道 时间:2024/06/23 05:22:13
比如数据库是lwl.mdb 其中有一例是“收入”在text中显示出这一例的总计,就是收入总计,最好有代码,谢谢

假设使用adodc连接数据库的话
Adodc1.RecordSource = "select sum(收入) as 收入合计 from 你的表名'也可以加上需要的条件 Where 你需要的条件 =" & 条件1 & "and 部门 = '" & 条件2 & "'"
Adodc1.Refresh
Adodc1.Recordset.MoveLast
你的text.text = Adodc1.Recordset.Fields("收入合计")

adodc会连接吧

连接数据库后通过循环语句一次取出这一列的值然后求和就行了
sum=0
do while not rs.eof
a=rs("列名")
sum=sum+a
loop
text1.text=sum

也可以用SQL语句实现求和

为什么是0分啊?
1楼的可以解决。