enlazando un datagridview con textbox

[alfil123]

hola amigos estoy tratando de que al dar click en una fila de un datagridview algunos campos de este se muestren en unos textbox
bueno este es el codigo que uso


Private Sub DataGridView1_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataGridView1.SelectionChanged
'DataGridView1.SelectedRows.
MsgBox(DataGridView1.SelectedRows.Count, MsgBoxStyle.Critical)
If DataGridView1.SelectedRows.Count > 0 Then
TxtClave.Text = DataGridView1.Item("Column1", DataGridView1.SelectedRows(0).Index).Value
'txtColumna2.Text = DataGridView1.Item("Column2", DataGridView1.SelectedRows(0).Index).Value
End If
End Sub


bueno es el evento selectionchanged, y pues da el caso de DataGridView1.SelectedRows.Count siempre se muestra igual a cero como si no ubiera seleccionado la fila de datagrid
porfavor denme una mano

[Sergio18]

Yo utlizo este codigo:

Código vb:

Private Sub Grid1_CellContentClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles Grid1.CellContentClick
 
        Me.textbox.Text = Me.Grid1.Rows(e.RowIndex).Cells(0).Value()
        Me.textbox.Text = Me.Grid1.Rows(e.RowIndex).Cells(1).Value()
 

Saludos

[alfil123]

no tampoco
quisas sea la forma en que lleno el grid

primero cargo
Me.ProveedoresTableAdapter.Fill(Me.DatosDataSet.pr oveedores)

y el datasource del grid es proveedoresBindingSource

bueno como les desia el DataGridView1.SelectedRows.Count del grid es = 0

[Ka0stj]

Primero cargo el DataGridView, para ello utilizo el siguiente método donde le especifico el query con el cual lo cargaré y el nombre del datagrid.

Código vb.net:

Public Sub Cargar_DatagridView(ByVal Instruccion_Sql As String, ByVal dgv As DataGridView)
 
        objConn = New SqlConnection(miconexion.StrConexion)
        Dim MiDataReader As System.Data.SqlClient.SqlDataReader
        Dim MiDataTable As New DataTable
 
        'Reseteo el Dataset para no mostrar repetidos
        Try
            ' SE ABRE LA CONEXION
            objConn.Open()
 
            Dim sql As System.Data.SqlClient.SqlCommand = New SqlCommand(Instruccion_Sql, objConn)
 
            MiDataReader = sql.ExecuteReader
 
            MiDataTable.Load(MiDataReader)
 
            dgv.DataSource = MiDataTable
 
            objConn.Close()
 
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
            objConn.Close()
        End Try
 
    End Sub
 

Después para tomar los datos a los textbox con el evento cellcontentClick, cellclick o selectionchanged del datagridview de la siguiente forma:

Código vb.net:

Dim renglon As Integer = Me.DataGridView.CurrentCell.RowIndex
 
Me.Textbox1.Text = Me.DataGridView.Item(0,renglon).Value
Me.Textbox2.Text = Me.DataGridView.Item(1,renglon).Value
...
 

donde 0,1,2, etc. son las columnas de mi renglon seleccionado. Saludos...

[davidalonsso05]

Iniciado por Ka0stj

Primero cargo el DataGridView, para ello utilizo el siguiente método donde le especifico el query con el cual lo cargaré y el nombre del datagrid.

Código vb.net:

Public Sub Cargar_DatagridView(ByVal Instruccion_Sql As String, ByVal dgv As DataGridView)
 
        objConn = New SqlConnection(miconexion.StrConexion)
        Dim MiDataReader As System.Data.SqlClient.SqlDataReader
        Dim MiDataTable As New DataTable
 
        'Reseteo el Dataset para no mostrar repetidos
        Try
            ' SE ABRE LA CONEXION
            objConn.Open()
 
            Dim sql As System.Data.SqlClient.SqlCommand = New SqlCommand(Instruccion_Sql, objConn)
 
            MiDataReader = sql.ExecuteReader
 
            MiDataTable.Load(MiDataReader)
 
            dgv.DataSource = MiDataTable
 
            objConn.Close()
 
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
            objConn.Close()
        End Try
 
    End Sub
 

Después para tomar los datos a los textbox con el evento cellcontentClick, cellclick o selectionchanged del datagridview de la siguiente forma:

Código vb.net:

Dim renglon As Integer = Me.DataGridView.CurrentCell.RowIndex
 
Me.Textbox1.Text = Me.DataGridView.Item(0,renglon).Value
Me.Textbox2.Text = Me.DataGridView.Item(1,renglon).Value
...
 

donde 0,1,2, etc. son las columnas de mi renglon seleccionado. Saludos...

Muy buena respuesta! a mi me sirvio el ultimo codigo para borrar el renglon ya que solo me mostraba la fila si seleccionaba la celda pero la segunda me sirvio con el evento SelectionChanged del DGV!!

Una duda.... para borrar una fila de igual manera seleccionando el renglon no la celda? como seria... este es mi codigo pero tengo que seleccionar cualquier celda y no el renglon...

Private Sub dgv2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles dgv2.MouseDown
If e.Button = System.Windows.Forms.MouseButtons.Right Then
Dim Mi_Test As DataGridView.HitTestInfo = Me.dgv2.HitTest(e.X, e.Y)
If Mi_Test.Type = DataGridViewHitTestType.Cell Then
If Mi_Test.RowIndex >= 0 Then
indice = Mi_Test.RowIndex
Me.dgv2.CurrentCell = Me.dgv.Rows(Mi_Test.RowIndex).Cells(Mi_Test.Column Index)
Me.dgv2.Rows(Mi_Test.RowIndex).Selected = True
men = New ContextMenuStrip()
men.Items.Add("Eliminar", Nothing, New EventHandler(AddressOf EliminarF))
Me.dgv2.ContextMenuStrip = men
End If
End If
End If
End Sub

O en que evento seria!