SQL INSTRUCCIONES
1 de 12
http://www.solovb.net/index.php/2009/01/06/datagridview/
Inicio
Información para anunciantes
Sitemap
Solo vb.net
Bases de Datos
Controles
Definiciones
Download
Ejemplos
Funciones
Glosario
Humor
Noticias
Recursos
Tutoriales
DataGridView
Publicado por Eliseo en Controles el 01 6th, 2009 | 23 respuestasProgramadores en Workana
workana.com/Programadores
¡Si Necesitas un Programador, las
Mejores Ofertas para tu Proyecto!
77
Tweet
Tweet
Este es un potente control para mostrar datos por pantalla, tiene
muchisimas opciones, trataremos de ver un ejemplo simple y luego
mencionaré todo lo que yo uso cuando trabajo con un DataGridView.
01. 'Conexión a la base de datos y obtención de los registrosen un DataTable
02. Dim cnn As New SqlConnection
03. cnn.ConnectionString = _
05/04/13 10:56
DataGridView | solo VB.NET - Visual Basic .Net
2 de 12
04.
05.
06.
07.
08.
09.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
http://www.solovb.net/index.php/2009/01/06/datagridview/
"Data Source=..\SQLEXPRESS; Initial Catalog=BasedePrueba;Integrated Security=True"
'Algunas lineas de este código tuvieron que ser divididas
'por no entrar en ekl ancho de pantalla.
cnn.Open()
Dim ds As New DataSet
Dim da As New SqlDataAdapter
Dim sql As String
sql = "Select * from SaldosClientes"
da.SelectCommand = New SqlCommand(sql, cnn)
da.Fill(ds)
cnn.Close()
'con esta linea obtengo un objeto DataTable
'(dt) con los registros resultantesDim dt As DataTable = ds.Tables(0)
'Ahora puedo asignar el DataTable (dt) al DataGridView1
DataGridView1.DataSource = dt
Con el código anterior alcanza para llenar nuestro primer DataGridView. Ahora veremos
que mas se puede hacer con este control.
01.
02.
03.
04.
05.
06.
07.
08.
09.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.'Definimos que fuente usar
DataGridView1.Font = _
New Drawing.Font("Tahoma", 8, FontStyle.Regular, GraphicsUnit.Point
'Que columnas estarán visibles
DataGridView1.Columns("Id").Visible = False
DataGridView1.Columns("Codigo").Visible = True
DataGridView1.Columns("RazonSocial").Visible = True
DataGridView1.Columns("Fecha").Visible = True
DataGridView1.Columns("Saldo").Visible = True
'Cualsera el orden de las columnas
DataGridView1.Columns("Id").DisplayIndex = 0
DataGridView1.Columns("Codigo").DisplayIndex = 1
DataGridView1.Columns("RazonSocial").DisplayIndex = 2
DataGridView1.Columns("Fecha").DisplayIndex = 3
DataGridView1.Columns("Saldo").DisplayIndex = 4
'Ancho de columnas
DataGridView1.Columns("Id").Width = 100
DataGridView1.Columns("Codigo").Width = 100DataGridView1.Columns("RazonSocial").Width = 100
DataGridView1.Columns("Fecha").Width = 100
DataGridView1.Columns("Saldo").Width = 100
'El encabezado de las columnas
DataGridView1.Columns("Id").HeaderText = "Id"
DataGridView1.Columns("Codigo").HeaderText = "Código"
05/04/13 10:56
DataGridView | solo VB.NET - Visual Basic .Net
3 de 12
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
http://www.solovb.net/index.php/2009/01/06/datagridview/
DataGridView1.Columns("RazonSocial").HeaderText = "Razón Social"
DataGridView1.Columns("Fecha").HeaderText = "Fecha"
DataGridView1.Columns("Saldo").HeaderText = "Saldo"
'La alineación de las celdasde cada columna
DataGridView1.Columns("Id").DefaultCellStyle.Alignment = _
DataGridViewContentAlignment.BottomRight
DataGridView1.Columns("Codigo").DefaultCellStyle.Alignment = _
DataGridViewContentAlignment.BottomLeft
DataGridView1.Columns("RazonSocial").DefaultCellStyle.Alignment = _
DataGridViewContentAlignment.BottomLeft
DataGridView1.Columns("Fecha").DefaultCellStyle.Alignment = _...
Regístrate para leer el documento completo.