| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 943 人关注过本帖
标题:[求助]在vb中, 如何将 select sum的结果存到一个text里 ?
只看楼主 加入收藏
luckyybr
Rank: 1
等 级:新手上路
帖 子:38
专家分:0
注 册:2007-9-30
收藏
 问题点数:0 回复次数:6 
[求助]在vb中, 如何将 select sum的结果存到一个text里 ?

对数据表里的数据求和,再将结果放到text里显示出来

怎么实现?

谢谢

搜索更多相关主题的帖子: sum text select 结果 
2007-10-06 13:43
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
purana来。
2007-10-06 13:51
gggg007
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2007-7-18
收藏
得分:0 
rs.Open "select sum(XXX) as ZZ from cplk ", con, 1, 3
If IsNull(rs!ZZ) Then
MsgBox "没有找到相关数据", vbExclamation, "提示"
Else
Set Text7.DataSource = rs
Text7.DataField = ZZ
Text7.Text = rs!ZZ
End If
2007-10-06 16:03
luckyybr
Rank: 1
等 级:新手上路
帖 子:38
专家分:0
注 册:2007-9-30
收藏
得分:0 
以下是引用gggg007在2007-10-6 16:03:54的发言:
rs.Open "select sum(XXX) as ZZ from cplk ", con, 1, 3
If IsNull(rs!ZZ) Then
MsgBox "没有找到相关数据", vbExclamation, "提示"
Else
Set Text7.DataSource = rs
Text7.DataField = ZZ
Text7.Text = rs!ZZ
End If

谢谢,但是我用了,会出错的
报错信息"实时错误3001":

arguments are of the wrong type , are out of acceptable range, or are in confilict with one another

[此贴子已经被作者于2007-10-6 21:39:18编辑过]

2007-10-06 16:22
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 

来晚了?


我的msn: myfend@
2007-10-06 17:50
multiple1902
Rank: 8Rank: 8
等 级:贵宾
威 望:42
帖 子:4881
专家分:671
注 册:2007-2-9
收藏
得分:0 
嗯对
2007-10-06 17:50
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
收藏
得分:0 
之前不是回答过了吗?..
我附近都发过上来了..

我的msn: myfend@
2007-10-06 17:53
快速回复:[求助]在vb中, 如何将 select sum的结果存到一个text里 ?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015348 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved