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:
Public Function Busqueda() As String
Dim con As String
con = "Data Source=GDJF04973;Initial Catalog=LabInventarioN3;User ID=f5;Password=f5report"
Dim cnn As New SqlConnection
cnn.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 & "'", cnn)
cnn.Open()
Dim cmd As SqlDataReader
cmd = query.ExecuteReader()
Dim res As String = Nothing
If cmd.Read() Then res = cmd(0)
cmd.Close()
cnn.Close()
Return res
End Function
El codigo del Boton es el siguiente:
Private Sub btnBuscar_Click(sender As Object, e As EventArgs) Handles btnBuscar.Click
txtID.Text = Busqueda()
btnActualizar.Show()
btnGuardar.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.