需要连接的是记录集啊。。。。比如:
Dim CN As New ADODB.Connection
Dim Rs As New ADODB.Recordset
CN.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\NWIND.MDB;Persist Security Info=False "
CN.Open
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees ", CN, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = Rs '这里,连接的是记录集。。。
我试过了有数据的,
放在Form_Lload事件里或Command1_Click事件里都行
比较奇怪,你换个数据库和表看看行不。