¿Como Llenar Textbox al Seleccionar un Dato de un Combobox?

[rikakashi]

yo por ejemplo hago esto

Código vb:

Dim da As New SqlDataAdapter("select * from TBL_MEM_CLIENTES where CL_MEMBRESIA=" & Trim(Me.txt_membresia.Text), conexion_BD)
            da.Fill(ds)
 txt_1_nom.Text = ds.Tables(0).Rows(0).Item("CL_1_NOM").ToString
            txt_2_nom.Text = ds.Tables(0).Rows(0).Item("CL_2_NOM").ToString
            txt_1_ap.Text = ds.Tables(0).Rows(0).Item("CL_1_AP").ToString
            txt_2_ap.Text = ds.Tables(0).Rows(0).Item("CL_2_AP").ToString
            txt_rfc.Text = ds.Tables(0).Rows(0).Item("CL_RFC").ToString
            txt_calle.Text = ds.Tables(0).Rows(0).Item("CL_CALLE").ToString