Private Sub Command1_Click() Adodc1.RecordSource = "select 字段1,字段2 from a1 order by n" Adodc1.Refresh Set MSChart1.DataSource = Adodc1.RecordSet End Sub
怎么还是不行呢?????????Private Sub Command1_Click() Adodc1.RecordSource = "select 字段1,字段2 from a1 order by n" Adodc1.Refresh Set MSChart1.DataSource = Adodc1.RecordSet End Sub
Adodc1.RecordSource = "select 字段1,字段2 from a1 order by n"
Adodc1.Refresh
Set MSChart1.DataSource = Adodc1.RecordSet
End Sub
怎么还是不行呢?????????Private Sub Command1_Click()
Adodc1.RecordSource = "select 字段1,字段2 from a1 order by n"
Adodc1.Refresh
Set MSChart1.DataSource = Adodc1.RecordSet
End Sub