关于一个求值的问题

cclxj 2001-02-03 03:38:00
各位老师:
请问在vb6.0中如何对一个表中所有记录的某个字段求和。并把这个值放入text控件中。
我是这样写的,但老是出错。请指导。
dim rs as new adodb.recordset
set rs=cnn.execute("select sum("金额") from aa
text2.text=rs.fields(金额).value
注:aa 是一个表,金额为其中一个字段。
...全文
121 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
skt642 2001-05-31
  • 打赏
  • 举报
回复
12512关注!
vbdabster 2001-02-03
  • 打赏
  • 举报
回复
哈哈,我打开时还没有一个answer,我出去了一下,竟然有这么多的,太。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
vbdabster 2001-02-03
  • 打赏
  • 举报
回复
非常简单,把金额的引号去掉就好了
cclxj 2001-02-03
  • 打赏
  • 举报
回复
to DeD
非常感谢!!!!!!!!!!
haor 2001-02-03
  • 打赏
  • 举报
回复
set rs=cnn.execute("select sum(金额) from aa")
text2.text=rs(0) & ""
DeD 2001-02-03
  • 打赏
  • 举报
回复
试一下
set rs=cnn.execute("select sum([金额]) as F1 from aa")
text2.text=rs.fields("F1").value & ""

注:SQL SERVER
& ""保证如果值为NULL时不会出错
cclxj 2001-02-03
  • 打赏
  • 举报
回复
上一句是:set rs=cnn.execute("select sum("金额") from aa")
因写的急而漏了。
请各位一定要帮忙啊。
在此表示感谢!!!!!!!!!!

7,763

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧