Autor Tema: Ayudadmae a recorrer un ComboBox.....  (Leído 6222 veces)

0 Usuarios y 1 Visitante están viendo este tema.

el_trocha

  • Kilobyte
  • **
  • Mensajes: 62
  • Reputación: +1/-2
    • Ver Perfil
Ayudadmae a recorrer un ComboBox.....
« en: Febrero 07, 2011, 03:58:59 pm »
Hola gente....

A ver quien me puede ayudar con esto.....

Quiero recorrer un ComboBox con un bucle for.....

Y a cada paso del bucle, que una variable recoja el dato del combo.

Me explico.

For i = 0 to combobox.listcount -1

     variable = combobox(i).text ........ Aqui no encuentro el metedo de hacer que guarde el texto de cada elemento.

next i

Unn saludito a todos....

Y gracias de antemano

fernandos85al@hotmail.com

  • Kilobyte
  • **
  • Mensajes: 71
  • Reputación: +3/-3
    • Ver Perfil
Re:Ayudadmae a recorrer un ComboBox.....
« Respuesta #1 en: Febrero 07, 2011, 04:59:07 pm »
Hola, no se si sera muy tarde para ayudarte, pero de todas formas mira este ejemplo, no se si sera lo que querias..

Código: [Seleccionar]
Dim MyVar As Integer
Private Sub Command1_Click()
With Combo1
For k = 0 To .ListCount
MyVar = k
Open "g:\sampless.txt" For Append As #1  ' Cambiar la unidad para que funke
Print #1, MyVar
Close #1

Next k

End With
End Sub

Private Sub Form_Load()
With Combo1
For i = 1 To 100
.AddItem i
Next i
End With
End Sub


en un formulario nuevo, pone un command, un combo, al iniciar el formulario, se cargaran numeros desde 0 a 100.

Al hacer click en el command, recorre el combo, los carga en una variable (MyVar) y los Guarda en un archivo de texto.


espero te sirva, saludos, cualquier cosa avisa.