Este ejemplo sencillo, llena un combobox con datos de una tabla, al seleccionar un item del combo me devuelve datos concernientes al codigo selecccionado
Imports System.Data.SqlClient
Public commActSel As New SqlClient.SqlCommand("Select * from Actividades", Con)
Public AdpActividades As New SqlClient.SqlDataAdapter
Public dsetActividades As New DataSet
'evento load
Con.Open()
commActSel.ExecuteNonQuery()
AdpActividades.SelectCommand = commActSel
dsetActividades.Clear()
AdpActividades.Fill(dsetActividades, "Actividades")
cboActividades.DataSource = dsetActividades.Tables(0)
cboActividades.DisplayMember = "NombreActividad"
cboActividades.ValueMember = "IdActividad"
cboActividades.SelectedIndex = 0
con.close
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Private Sub cboActividades_SelectionChangeCommitted(ByVal sender As Object, ByVal e As System.EventArgs) Handles cboActividades.SelectionChangeCommitted
For x As Int32 = 0 To dsetActividades.Tables(0).Rows.Count - 1
If dsetActividades.Tables(0).Rows(x).Item("IdActividad") = cboActividades.SelectedValue Then
MessageBox.Show(dsetActividades.Tables(0).Rows(x).Item("NombreActividad").ToString)
End If
Next
End Sub