Configurar ComboBox

[Padatomi]

Por favor estou com problemas para configurar o combo...

Tenho duas tabelas no banco de dados.... que estão relacionadas Medico e Especialidade

Na tabela Medico há o campo codespecialidade

Estou usando adodb...

Eu quero que quando eu abra o form do cadastro de medico...

que apareça o nome das especialidades, porém eu quero armazenar o codigo referente a especialidade na tabela medico... Consigo fazer isto no VB 6, mas no VB .Net não... =/

rsMedico = New ADODB.Recordset
strsql1 = "SELECT * FROM tblMedico"
rsMedico.Open(strsql1, dbConexao, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
Do While Not (rsMedico.EOF)
      cboMedico.Items.Add(rsMedico("CodMedico_Med").Value)
      rsMedico.MoveNext()
Loop

rsDisponibilidade = New ADODB.Recordset
strsql = "SELECT * FROM tblDisponibilidade"
rsDisponibilidade.Open(strsql, dbConexao, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)
If Not (rsDisponibilidade.BOF) And Not (rsDisponibilidade.EOF) Then
     MoveParaTela()
End If

Se puderem ajudar...

Boa noite

[index.xp]

deixa eu ver se entendi... você tem duas combo... você quer apertar "abrir" em uma e nela vai aparecer as especialidades e a outra vai aparecer os medicos que tem essa especialidade.... certo?