kien sabe hacer un for en vb6

jose
03 de Marzo del 2006
le pido ayuda a kien sepa hacer un for en visual basic

mawie
03 de Marzo del 2006
Dim Found, MiObjeto, MiColección
Found = False \\' Inicializa variable.
For Each MiObjeto In MiColección \\' Itera por cada elemento.
If MiObjeto.Text = \"Hola\" Then \\' Si Texto es igual \"Hola\".
Found = True \\' Establece como Verdadero.
Exit For \\' Sale del bucle.
End If
Next

alezapata
03 de Marzo del 2006
Tenés que comenzar con:

For(para) "un número" to (hasta) "otro número"
"lo que querés que haga el programa"
next
"un número y otro número" podés declararlos como valores de una variable Integer, Byte, double, long...
Ejemplo

Dim N as Integer ' Declaro una variable N de nº enteros
For N= 1 to 5
text1(n).locked = false 'Cierra para escritura los
'controles text1(N)
next
Lo que hice fue pedirle al visual que me inhabilite para escribir en los controles textbox llamado text1 (lo que está entre paréntesis es un índice, que se utiliza cuando se crean controles que se llaman igual). Los controles inhabilitados serían: Text1(1), Text1(2),Text1(3), Text1(4) y Text1(5)

alezapata
03 de Marzo del 2006
Tenés que comenzar con:

For(para) "un número" to (hasta) "otro número"
"lo que querés que haga el programa"
next
"un número y otro número" podés declararlos como valores de una variable Integer, Byte, double, long...
Ejemplo

Dim N as Integer \' Declaro una variable N de nº enteros
For N= 1 to 5
text1(n).locked = false \'Cierra para escritura los
\'controles text1(N)
next
Lo que hice fue pedirle al visual que me inhabilite para escribir en los controles textbox llamado text1 (lo que está entre paréntesis es un índice, que se utiliza cuando se crean controles que se llaman igual). Los controles inhabilitados serían: Text1(1), Text1(2),Text1(3), Text1(4) y Text1(5)