mschart解决方法
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
各位高手：我从数据库中读出数据，然后用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