Visual Basic - Error al declarar un recordset

Hola, estoy programando con ADO, pero no con objeto sino con codigo, el tema es que cuando declaro un recordset, ej: Dim rec As recordset y lo quiero procesar me dice q no coinciden los tipos, pero cuando no lo declaro lo procesa perfectamente.
Y al no declararlo no reconoce automaticamente los metodos addnew, EOF, etc, los tengo q poner a mano.

Ahi parte de mi codigo y gracias

Private Sub Command1_Click()
Dim rec As Recordset ' si borro esta linea funciona

SQL = "select * from productos"
SQL = SQL & " where codigo_p=" & txt(0).Text
Set rec = base.OpenRecordset(SQL)

If rec.EOF Then
With rec
.AddNew
!codigo_p = txt(0).Text
!descripcion_p = txt(1).Text
.Update
End With