Codigo para crear una grilla o datagrid

[Agomezs]

Hola! es facil, mira un ejemplo de como utilice un DataGrid en un Fomulario, espero q esto te sirva de algo....

Mi Conexión con la base de datos es por medio del ADODC y utilizo una cadena de conexión. Coloco el siguiente codigo para lograr la conexión.

Sub Conexion()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BASEDATOS.mdb" & ";Persist Security Info=False"
Adodc1.RecordSource = "TABLA" 'entre las comillas pones el nombre d tu tabla
Adodc1.Refresh
End Sub

luego en el FormLoad de este mismo formulario llamo ese Procedimiento con

Private Sub Form_Load()
Call Conexion
End Sub

Listo... ya esta conectada la base de datos al formulario. Ahora en las propiedades del DataGrid busca DataSource y escoge el ADO con el q deseamos conectar al DataGrid. Luego conectamos las columnas del Grid con las columnas de la tabla de la base de datos.

Realizado esto, ya se debe ver la información guardada en las tablas de la base de datos en el DataGrid. Para filtrar o buscar un dato especifico del Grid yo utilizo un TexBox y el codigo q coloco es el siguiente:

Private Sub Text1_Change()
If Text1.Text <> " " Then
Adodc1.Recordset.Filter = "CAMPO like ('*" & Text1 & "*')"
End If
End Sub

Espero q te sirva