
Ayuda con datagrid
Publicado por Henry Salcedo (3 intervenciones) el 12/04/2014 00:03:05
Hola amigos, ante todo un cordial saludo a cada uno de ustedes.
Tengo dos aplicaciones desarrolladas en vb6 y estoy migrando a vb 2012 y la verdad que me perdi, es por este motivo que recurro a ustedes para poder solucionar algunas consultas.
Tengo un tabla enlazada a un datagrid.
Try
'llamar al procedimiento conectado para abrir la base de datos
Conectado()
cmd = New SqlCommand("SELECT * FROM Inicio_Actividades ORDER BY Ano_Academico DESC")
cmd.CommandType = CommandType.Text
cmd.Connection = cnn
If cmd.ExecuteNonQuery Then
Dim dt_ac As New DataTable
da = New SqlDataAdapter(cmd)
da.Fill(dt_ac)
If dt_ac.Rows.Count <> 0 Then
DtgActividades.DataSource = dt_ac
Else
DtgActividades.DataSource = Nothing
End If
Else
End If
Catch ex As Exception
End Try
AHORA LO QUE DESEO HACE ES QUE CADA VEZ QUE SELECCIONE UNA FILA DEL DATAGRID, QUIERO MOSTRAR EL VALOR DE UNA CAMPO EN UN CUADRO DE TEXTO
De esta manera lo hacia en VB6.
txtCodEspe.Text=Nombre_Recordset!Nombre_Campo
Espero su pronta respuesta.
Gracias
Tengo dos aplicaciones desarrolladas en vb6 y estoy migrando a vb 2012 y la verdad que me perdi, es por este motivo que recurro a ustedes para poder solucionar algunas consultas.
Tengo un tabla enlazada a un datagrid.
Try
'llamar al procedimiento conectado para abrir la base de datos
Conectado()
cmd = New SqlCommand("SELECT * FROM Inicio_Actividades ORDER BY Ano_Academico DESC")
cmd.CommandType = CommandType.Text
cmd.Connection = cnn
If cmd.ExecuteNonQuery Then
Dim dt_ac As New DataTable
da = New SqlDataAdapter(cmd)
da.Fill(dt_ac)
If dt_ac.Rows.Count <> 0 Then
DtgActividades.DataSource = dt_ac
Else
DtgActividades.DataSource = Nothing
End If
Else
End If
Catch ex As Exception
End Try
AHORA LO QUE DESEO HACE ES QUE CADA VEZ QUE SELECCIONE UNA FILA DEL DATAGRID, QUIERO MOSTRAR EL VALOR DE UNA CAMPO EN UN CUADRO DE TEXTO
De esta manera lo hacia en VB6.
txtCodEspe.Text=Nombre_Recordset!Nombre_Campo
Espero su pronta respuesta.
Gracias
Valora esta pregunta


0