No se como hacer lo siguiente:
Quiero llenar los TextBox de mi Formulario a partir del resultado de un consulta en sql. Mi codigo de la consulta en visual es el siguiente:
PrivatePublic SubFunction btnBuscar_ClickBusqueda(sender As Object, e As EventArgs) Handles btnBuscar.Click
As TryString
Dim con As String
con = "Data Source=GDJF04973;Initial Catalog=LabInventarioN3;User ID=f5;Password=f5report"
Dim cncnn As New SqlConnection
cncnn.ConnectionString = con
Dim query As New SqlCommand("select i.ID,i.Proyecto,i.Tipo, i.Cantidad,i.Ubicacion,i.Descripcion,i.Modelo,i.[Numero de Parte],
i.NumeroSerie,i.Status,i.Comentarios from InventarioLab i where i.ID like '" & txtBuscarID.Text & "'", cncnn)
cncnn.Open()
Dim cmd As SqlDataReader
cmd = query.ExecuteNonQueryExecuteReader()
Dim res As String btnActualizar= Nothing
If cmd.ShowRead() Then res = cmd(0)
cmd.Close()
btnGuardarcnn.HideClose()
CatchReturn exres
End Function
El codigo del Boton es el siguiente:
Private Sub btnBuscar_Click(sender As Exception
Object, e As EventArgs) Handles btnBuscar.Click
MsgBox txtID.Text = Busqueda("Error:")
+ ex btnActualizar.ToStringShow()
End TrybtnGuardar.Hide()
End Sub
El codigo funciona correctamente. Solo quiero que se llenen los TextBox con los datos obtenidos. en su campo correspondiente
Mi formulario es el siguiente:
La consulta se hace al dar click en el Boton Buscar.
Gracias.