del combo llamar los datos a una textbox de una bd

[RootK]

Hola... una pregunta.. no sería mas fácil obtener el producto a través de un id en vez de descripción..??

New SqlDataAdapter("select * from producto where descripcion='" + DESCRIP +

Podría quedar algo así:

New SqlDataAdapter("select * from producto where idProducto=" id_Producto)

Ahora.. en vez de usar un dataset te recomendaría un datareader.. (en este caso). ejemplo.

Dim oConn As New SqlConnection(ConfigurationSettings.AppSettings("t u_conexion"))
Dim cmd As New SqlCommand("select * from producto where idProducto=" & id_Producto, oConn)
oConn.Open()
Dim r As SqlDataReader = cmd.ExecuteReader

If r.Read then
txtpre.Text = r("precio")
else
MsgBox("no existe")
End IF

r.close
oConn.close

Saludos y suerte