关于mschart控件和adobc控件的联合使用问题

[antimicrosoft]

Private rsstudent As New ADODB.Recordset
Private cn As New ADODB.Connection

Private Sub Form_Load()
Dim strQuery As String ' SQL query string.

' First change the path to a valid path for your machine.
cn.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & _
"g:\database\vir.mdb" ' <-Change this path.

' Open the connection.
cn.Open

strQuery = "SELECT * from virtable"
' Open the recordset.
rsstudent.Open strQuery, cn, adOpenKeyset ' http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/mdconrecordsetopen.asp

With MSChart1
.ShowLegend = True
Set .DataSource = rsstudent
End With


End Sub


运行之后mschart控件不显示任何东东，为什么？

[sc1234]

我是直接设定mschart的列和列内容
好象直接用datasource连接是不行的
除非你的数据库的列设定与mschart
的默认设定一致

[chenyu5188]

UP