Cómo enlazar un conjunto de datos a un DataGridView

El DataGridView es un control ActiveX a menudo se utiliza en aplicaciones basadas en Visual Basic para la unión y la importación de datos desde una base de datos externa y luego la presentación de los datos en un formato de hoja de cálculo. Antes de conectar el control DataGridView a través de código de programación, que se requiere para colocar el control en su formulario de VB en primer lugar. Enlazar el control DataGridView requiere algunos conocimientos de programación VB. Una vez que se adquiere, conseguir que se haga tarda sólo unos pasos y simples líneas de código.

Instrucciones

1 Abra Visual Basic 6.

2 Seleccione "EXE estándar" de la nueva lista de proyectos. Ahora se encuentra en el entorno de Visual Basic 6 de programación. Usted debe tener una forma principal por defecto en la pantalla para comenzar a añadir sus controles.

3 Haga clic en "Proyecto" seguido de "componentes".

4 Desplazarse por la lista de componentes y busque "Microsoft DataGridView de control". Coloque una marca en la casilla junto a él y haga clic en "Aceptar". Esto colocará el control DataGridView en su Cuadro de controles.

5 Seleccione el control DataGridView de la caja de herramientas. Arrastrar y soltarlo en su forma principal para empezar a usarlo.

6 Ir al menú superior y haga clic en "Proyecto" seguido de "Agregar módulo." Tipo o copiar y pegar el código siguiente en el módulo:

Private Sub GetData (ByVal SelectCommand como secuencia)

Try
' Specify a connection string. Replace the given value with a
' valid connection string for a Northwind SQL Server sample
' database accessible to your system.
Dim connectionString As String = _
"Integrated Security=SSPI;Persist Security Info=False;" + _
"Initial Catalog=Northwind;Data Source=localhost"

'Crear un nuevo adaptador de datos basado en la consulta especificada.
Me.dataAdapter = New SqlDataAdapter (SelectCommand, connectionString)

'Crear un constructor de comandos para generar SQL de actualización, inserción y
'Eliminar comandos basados ​​en SelectCommand. Estos se utilizan para
'Actualizar la base de datos.
Dim CommandBuilder Como Nueva SqlCommandBuilder (Me.dataAdapter)

"Llenar una nueva tabla de datos y enlazarlo a la BindingSource.
Dim tabla como nuevo DataTable ()
table.Locale = System.Globalization.CultureInfo.InvariantCulture
Me.dataAdapter.Fill (tabla)
Me.bindingSource1.DataSource = mesa

"Cambiar el tamaño de las columnas DataGridView para adaptarse al contenido recién cargada.
Me.dataGridView1.AutoResizeColumns (_
DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader)
Catch ex como SqlException
MessageBox.Show (& quot; Para ejecutar este ejemplo, reemplazar el valor de la & quot; + _
& Quot; connectionString variable con una cadena de conexión que es & quot; + _
& Quot;. Válida para el sistema & quot;)
Try End

End Sub