[SOLUCIONADO] Bucle****

[franco55]

AMIGOS necesito q una de estas variable me ponga 1 en el textbox, y q vaya sumando cada vez q carge el formload el formulario(q entre al form)...como esta puesto un top ai me tira 100....noce como parar el bucle para q qede en 1 y la proxima sea 2......me ayudan si no es con el while el for next o algun otra sentencia

Dim cantt As Integer

'........................BUCLE.................... ...
'Dim top As Integer, s As Integer
'cantt = 1
's = cantt
'top = 100
'Do While Not cantt >= top
'Text4.Text = cantt
----------INICIO-----------PROCESO-----------FIN-----------------

'..................BUCLE.......................... ..
'If cantt <= top Then
'cantt = cantt + 1
's = cantt
'End If
'Loop
..........OTRA FORMA...................
For cantt = 1 To 100
Text4.Text = cantt
'Next cantt

[carbon]

Realmente no entendí nada. Puedes encerrar tu código usando la etiqueta Highlight de VB? También usa comas (,) y puntos (.) para que se entienda mejor tu idea!

[franco55]

Dim cantt As Integer

'Dim top As Integer, s As Integer
'cantt = 1
's = cantt
'top = 100
'Do While Not cantt >= top
'Text4.Text = cantt
'If cantt <= top Then
'cantt = cantt + 1
's = cantt
'End If
'Loop
--------------------------asi es perdon la mala exprecion, lo unico q quiero es q en un textbox aparesca el n° 1 ami me aparece el 100.....quiero q el ciclo pare y ponga el 1 en el text.....o si hay otra forma de hacerlo

[carbon]

Que tal así?

Código vb:

Text4.Text = "1"