Visual Basic - Combobox y textbox

Tengo un combobox en visual basic 6.0 en el cual le llevo los nombres de las ciudades y necesito que cuando el usuario escoja una ciudad del combobox le lleve el indicativo que le corresponde a esta ciudad a un textbox....

Muchas gracias por su colaboración......

Hola a ver si te sirve este ejemplo

bueno creo que en tu pregunta te referias al indicativo telefonico, pero si no es asi pues cambias el dato ok?

pon un form con un combobox y un textbox y dentro del formulario este codigo



Private Sub Form_Load()
Combo1.AddItem "ESPAÑA"
Combo1.ItemData(Combo1.NewIndex) = 34
Combo1.AddItem "FRANCIA"
Combo1.ItemData(Combo1.NewIndex) = 33
Combo1.AddItem "ITALIA"
Combo1.ItemData(Combo1.NewIndex) = 39
End Sub

Private Sub Combo1_Click()
Text1.Text = "INDICATIVO TELEFONICO: " & _
CStr(Combo1.ItemData(Combo1.ListIndex))
End Sub



salu2

Gracias por responderme.....
El combo ya lo estoy llenando por medio de una función y le estoy llevando un campo(nombre de la ciudad) que tiene una tabla en la base de datos y funciona correctamente.
Lo que necesito es que al escoger cualquier nombre de ese combo me lleve el indicativo correspondiente a la ciudad seleccionada al textbox

Gracias..............