mschart
各位高手:我从数据库中读出数据,然后用MSCHART作出一个二维折线图
Dim recsADO As New ADODB.Recordset
Dim cnn As New ADODB.Connection
cnn.ConnectionString = "DSN=linyi;UID=sa;PWD=sa "
cnn.Open
If recsADO.State = adStateOpen Then recsADO.Close
recsADO.Open "select * from 日平均潜水位 ", cnn, 3, 2
我想让横坐标显示日期,纵坐标显示日平均潜水位,并且在坐标轴上标出相应的坐标值,下面的代码该如何写?请帮忙,谢谢!!!
[解决办法]
早年写的玩具,你参考下 http://yuan505.vicp.net/cy_filesxxx/vbsrc/chart.rar
[解决办法]
用数组的方式给CHARTDATA属性赋值。
[解决办法]
也可以单独对一行中的某列进行赋值
[解决办法]
mschart1.DataSource可以连接rs