Visual Basic - Como pongo un recordset a este ado

Hola a todos
quisiera saber como establecer un recordset para este control Ado
Siempre uso el control data pero me recomendaron usar el ado, en las
ayudas saque y estableci este codigo para mi aplicacion la cual
funciona pero no se como establecer el recordset que seria el siguiente
paso.

'cboMaterial es un datacombo

Ado1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;
Persist Security Info=False;Data Source = " & CommonDialog1.FileName

Ado1.RecordSource = "SELECT Id, Rubros, Prevista, Computada,
Fecha, Observacion FROM AVRubros WHERE Rubros = '" & cboMaterial & "';"

gracias a todos

Carlos

Declaras..

Dim Rs as ADODB.Recordset
Dim Abrir as String

Ya en alguna parte de tu código...

Set Rs = New ADODB.Recordset
Abrir="SELECT Id, Rubros, Prevista, Computada,
Fecha, Observacion FROM AVRubros WHERE Rubros = '" & cboMaterial & "';"
Rs.Open Abrir, Ado1, adOpenKeyset, adLockOptimistic

Espero esto te sirva...
Saludos