根据数据库中的内容动态使用mschart绘图解决办法

根据数据库中的内容动态使用mschart绘图
为了根据数据库中的内容动态绘制折现统计图，因此使用下面的代码来判断数据库中有几组数据。

VB code

rs3.Open "select date,student,op from log where student=" & "'" & Combo2.Text & "'", cnn, 1, 3Do Until rs3.EOFrs3.MoveNexttimes = times + 1Looprs3.Close

结果到这里悲剧了，不能使用变量声明变量……各位牛人们，这种情况怎么办？

VB code

Dim arrData4(1 To times, 1 To times)MSChart1.ShowLegend = TruearrData4(1, 1) = rs3("date")………………

[解决办法]
我的想法
1、定义一个二维数组，第一维曲线的X，第二维，曲线的Y
2、查询数据库，将得来的数据存入数组中。参考：http://download.csdn.net/detail/veron_04/3827200
3、将数组赋值给MSChart，参考：http://download.csdn.net/detail/veron_04/1483925

查看更多 下一篇