Visual Basic - error 13 en modulo

Me sale un error 13 en tiempo de ejecucion - no coinciden tipos de datos. este es el codigo
Global db As Database
Global recordci As Recordset
Global regcarrera As Recordset
Global regcategoria As Recordset
Global regclasificacion As Recordset
Global reginscripcion As Recordset
Sub main()
Set db = OpenDatabase("c:\todociclismo\baseciclista.mdb")
*Set recordci = db.OpenRecordset("ciclista", dbOpenTable)
'Set regcarrera = db.OpenRecordset("carrera", dbOpenTable)
'Set regcategoria = db.OpenRecordset("categoria", dbOpenTable)
'Set regclasificacion = db.OpenRecordset("clasificacion", dbOpenTable)
'Set reginscripcion = db.OpenRecordset("inscripcion", dbOpenTable)
Form1.Show
end sub
*no reconoce el registro "recordci"
gracias

Trata Cambiando tus globales por:

Global recordci As Dao.Recordset
Global regcarrera As Dao.Recordset
Global regcategoria As Dao.Recordset
Global regclasificacion As Dao.Recordset
Global reginscripcion As Dao.Recordset

Suerte!

Gracias anduvo perfecto