想问问MSChart怎么和数据库联系起来用?

watercat17 2001-05-16 05:42:00
想用MSChart来表示数据库里的内容,举个例子:比如总分,销量什么的
怎么用啊?看了看MSDN,好象说得也不是十分明白(我菜),各位高手的能否指教一下?
或者能不能提供一个例子给小弟?不盛感激。

...全文
181 点赞 收藏 9
写回复
9 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
watercat17 2001-05-21
忘了给分,抱歉了
回复
KitSdk 2001-05-19
我有源码 带打印和打印预览的
kitsdk!@263.net
哈哈 要给我 100分
回复
cqq_chen 2001-05-17
简单方法是:把你的数据汇总后到EXCEL中去,用EXCEL的图功能可以解决问题吗?
回复
watercat17 2001-05-17
谢谢 hwmys(合适软件)
有问题再找你了,我去试试

分一定会加的,宽心
回复
hwmys 2001-05-17
ReDim Xdata(1 To 8, 1 To 7) As Variant
Xdata(1, 2) = "第一外贸"
Xdata(1, 3) = "航空"
Xdata(1, 4) = "Test 3"
Xdata(1, 5) = "Test 4"
Xdata(1, 6) = "Test 5"
Xdata(1, 7) = "合适软件"
'以上是图例的标示,你可动态添加

Xdata(2, 1) = "1 月"
Xdata(2, 2) = 50
Xdata(2, 3) = 20
Xdata(2, 4) = 30
Xdata(2, 5) = 150
Xdata(2, 6) = 100
Xdata(2, 7) = 40

Xdata(3, 1) = "2 月"
Xdata(3, 2) = 60
Xdata(3, 3) = 50
Xdata(3, 4) = 40
Xdata(3, 5) = 30
Xdata(3, 6) = 20
Xdata(3, 7) = 1.25

PsBar1.Value = PsBar1.Value + 10
Xdata(4, 1) = "3 月"
Xdata(4, 2) = 160.5
Xdata(4, 3) = 160.2
Xdata(4, 4) = 160.3
Xdata(4, 5) = 160
Xdata(4, 6) = 160
Xdata(4, 7) = 160
Xdata(5, 1) = "4 月"
Xdata(5, 2) = 60
Xdata(5, 3) = 260
Xdata(5, 4) = 160
Xdata(5, 5) = 180
Xdata(5, 6) = 190
Xdata(5, 7) = 10.2
Xdata(6, 1) = "5 月"
Xdata(6, 2) = 60
Xdata(6, 3) = 26
Xdata(6, 4) = 16
Xdata(6, 5) = 18
Xdata(6, 6) = 19
Xdata(6, 7) = 102


Xdata(7, 1) = "6 月"
Xdata(7, 2) = 600
Xdata(7, 3) = 60
Xdata(7, 4) = 260
Xdata(7, 5) = 380
Xdata(7, 6) = 90
Xdata(7, 7) = 108
Xdata(8, 1) = "7 月"
Xdata(8, 2) = 60
Xdata(8, 3) = 260
Xdata(8, 4) = 160
Xdata(8, 5) = 180
Xdata(8, 6) = 190
Xdata(8, 7) = 10.2


MSChart1(0).ChartData = Xdata


把MSCHART的DATASOURCE属性设为对应的数据对象,只能简单地显示所有记录,无法筛选、汇总。你多试试,上面的代码可扩展成将数据库的记录筛选、汇总后动态赋值到ChartData。
多加点分,我有问必答,有源代码贴出!!!!!!!!!!
回复
pear 2001-05-16
对于VB中的任何一种控件来说,如果是能联系上数据库的
大都会有一个DATASOURCE属性,你试把MSCHART的DATASOURCE属性
设为对应的数据对象
回复
watercat17 2001-05-16
帮帮我呀!
回复
watercat17 2001-05-16
-_-~啊
回复
「已注销」 2001-05-16
VB

不会

算给你捧场了
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2001-05-16 05:42
社区公告
暂无公告