那第一个问题呢
怎么实现啊?

解决方案 »

  1.   

    '需引用Microsoft ActiveX Data Objects 2.7 Library
    Dim adoConn As ADODB.Connection
    Dim adoRS As ADODB.Recordset
    Set adoConn = New ADODB.Connection
    adoConn.CursorLocation = adUseClient
    adoConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= c:\abc.mdb"
    Set adoRS = New ADODB.Recordset
    adoRS.Open "select * from hycao", adoConn '<--根据treeview的不同选项更改SQL语句
    Set DataGrid1.DataSource = adoRS