SoloCodigo

Hola Camaradas espero y estén bien….
Necesito saber como llenar un ListBox desde una base de datos sql y una vez seleccionado el campo desplegarlo en un caja de texto, espero y puedan ayudarme……de ante mano gracias.

Camaradas ya lo solucione, lo hice de la siguiente manera....

Private Sub Bus_Emp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Bus_Emp.Click
        Dim strSQL As String
        conectar_bd()
        strSQL = "SELECT razon_social FROM clientes ORDER BY razon_social"
        Dim command As New SqlCommand(strSQL, Connection)
        Dim reader As SqlDataReader = command.ExecuteReader()
        While reader.Read()
            Empresa.Items.Add(reader.GetString(0))
        End While
        reader.Close()
    End Sub

    Private Sub Empresa_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Empresa.Click
        emp_cotiz.Text = Empresa.SelectedItem
        Empresa.Visible = False
    End Sub

Quedo bien despliega en el ListBox y al hacer Click sobre un campo del ListBox lo muestra en la caja de texto......y desaparece el ListBox.
Espero y le sirva a alguien.....Chaolines...

"Empresa" es el ListBox y "conectar_BD" es un modulo en el cual hago lo necesario para conectarme a la base de datos(espero sepas como hacerlo).
"Bus_Emp" es un Boton y aki en el evento Click, llena el ListBox y en Empresa en el evento Click traspaso el valor posicionandome en el ListBox haciendo Clik se traspasa a "emp_coti.text", que es una caja de texto......

Eso es bastante simple y con MYsql nose si sea asi pero creo yo q si solo cambiarian las Querys.....

Ojala y te haya servido, si no me dices y vemos q hacemos.....Suerte