Tema: Datagridview
Ver Mensaje Individual
  #6 (permalink)  
Antiguo 07/06/2009, 12:13
Avatar de jaullo
jaullo
 
Fecha de Ingreso: abril-2009
Mensajes: 994
Antigüedad: 15 años
Puntos: 30
Respuesta: Datagridview

Exacto, cada linea de tu datagrid, representaria una linea en tu base de datos.

Para volver a cargar los datos en el datagrid:

Private WithEvents bs As New BindingSource
Private sqldataadapter As SqlDataAdapter
Private Const cs As String = "Integrated Security=SSPI;Persist Security Info=false;Initial Catalog=tubd;Data Source=(local)"
Private bedit As Boolean

'cargar los registros
Function cargar()
Try
With tudatagrid
.AlternatingRowsDefaultCellStyle.BackColor = Color.FloralWhite
.DefaultCellStyle.BackColor = Color.Beige
.DataSource = bs

End With

cargarregistros("select * from personal where nombre='" & TextBox1.Text & "'", tudatagrid)

Catch ex As Exception
MessageBox.Show("Error al cargar los datos", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try

End Function


'para cargar los registros
Sub cargarregistros(ByVal sql As String, ByVal dv As DataGridView)
Try

sqldataadapter = New SqlDataAdapter(sql, cs)
Dim sqlcommandbuilder As New SqlCommandBuilder(sqldataadapter)
Dim dt As New DataTable()
sqldataadapter.Fill(dt)
bs.DataSource = dt
With dv
.Refresh()
.FirstDisplayedScrollingRowIndex = bs.Position

End With

bedit = False
Catch exsql As SqlException
MsgBox(exsql.Message.ToString)
Catch ex As Exception
MsgBox(ex.Message.ToString)
End Try

End Sub


Saludos,