Visual Basic Foro

Programación => Visual Basic 6 => Mensaje iniciado por: el_trocha en Febrero 07, 2011, 03:58:59 pm

Título: Ayudadmae a recorrer un ComboBox.....
Publicado por: el_trocha 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
Título: Re:Ayudadmae a recorrer un ComboBox.....
Publicado por: fernandos85al@hotmail.com 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.