Подключаюсь к базе MS Access через JET
подключение проходит и записи есть в рекордсете.
Dim myADO As ADODB.Connection
Dim rs As ADODB.Recordset

Set myADO = New ADODB.Connection

myADO.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=f:\DataProekt1_VB\tab1.mdb"

Set rs = New ADODB.Recordset
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Open "wrk1", myADO, , , adCmdTable


Как теперь программно подключить этот рекордсет к контролу DBGrid
Пишет ошибку "Class does not support"
Помогите!

Контрола adodc не использую. Как все сделать программно???