Hola Jose:
Primero te tienes que conectar a la base de datos, yo me conecto con SQL, de la siguiente manera:
Ejemplo: Cargar un MsFlexGrid con el Nombre, Apellidos y Direccion
En el modulo principal
'Conexión a ADO
Public rst As ADODB.Recordset
Public cnn As ADODB.Connection
Public Sub AbrirADO()
'Por si esta abierta la BBDD
Set cnn = Nothing
Set rst = Nothing
'Creamos los objetos
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
'Abrimos la base
cnn.Open "Provider=SQLOLEDB; " & _
"Initial Catalog=NombreBasedeDatos; " & _
"Data Source=10.0.0.55; " & _
"integrated security=SSPI; persist security info=True;"
End Sub
Y ahora, en donde tengo el MsFlexGrid, pongo:
AbrirADO 'Abrimos la base de datos (ver ModuloPrincipal)
rst.Open "Select Nombre, Apellidos, Direccion From Tabla", cnn, adOpenDynamic, adLockOptimistic
'Ahora ponemos un bucle para recuperar todos los datos de la tabla y escribirlos en el MsFlexGrid
Do Until rst.EOF
MsFlexGrid.AddItem (rst!Nombre & Chr$(9) & rst!Apellidos & Chr$(9) & rst!Direccion)
rst.MoveNext
Loop
No se si estabas buscando esto, espero que te sirva.
Saludos
Ana
