molyviac
13 de Abril del 2004

hola!!!
tengo problemas con el c贸digo del combo.pueden ayudarme? lo siguiente es el c贸digo que escrib铆:
Private Sub Command1_Click()
Debug.Print cboDest.Text
End Sub

Private Sub Form_Load()
cboDest.Text = ""
cboDest.AddItem = "Paris"
cboDest.AddItem = "Moscu"
cboDest.AddItem = "Nueva york"
cboDest.AddItem = "Mexico"
cboDest.AddItem = "Rio de Janeiro"
End Sub
y al correr el programa me aparece un error con respecto a Additem que dice: " el argumento no es opcional"
que puedo hacer?

shiquilla
13 de Abril del 2004

Buenas, es sencillo, ponlo asi:

Private Sub Form_Load()
cboDest.Text = ""
cboDest.AddItem "Paris"
cboDest.AddItem "Moscu"
cboDest.AddItem "Nueva york"
cboDest.AddItem "Mexico"
cboDest.AddItem "Rio de Janeiro"
End Sub

Un Saludo

Eduardo
13 de Abril del 2004

bueno, la codificacion que te da Chiquilla es correcta y si no funciona, traslada toda es programacion al evento Form_Activate() y no lo dejes en Form_load()

Taek
13 de Abril del 2004

'Haber si te sirve
Private Sub Form_Activate()
cboDest.Clear
cboDest.AddItem ( "Paris")
cboDest.AddItem ( "Moscu")
cboDest.AddItem ( "Nueva york")
cboDest.AddItem ( "Mexico")
cboDest.AddItem ( "Rio de Janeiro")
End Sub