Cita:
Iniciado por chicho28 
Aqui estan las lineas?
***********************
Private Sub Form_Load()
Set rs = New ADODB.Recordset // puse esto y tampoco funciona
rs.Open ("select * from clientes"), con ** aqui es el error
Text1.Text = rs.Fields("nombre")
End Sub
Efectivamente, es por lo que te dice
KingColt. No estás abriendo la conexión.
Lo normal, es que en módulo .bas se declaren las variables Públicas y en el formulario de inicio (o Sub Main) se ejecuten las conexiones y antes de salir de la aplicación, se cierren.
De todas formas, si quieres seguir manteniendola en el .bas, debes declarar el procedimiento Conexion() como Public y no Private y llamarla desde el Form_Load() antes de abrir el recordset.
