Programación General > Visual Basic 6.0 e inferiores

 BUCLE INFINITO "como evitarlo"

(1/2) > >>

calichecal:
estoy tratando  de utilizar un while solo por practicar que empieze con el evento clip de un command ,he leido y seguido al pie de la tetra la estructura de esa instruccion pero siempre termino en un bucle infinito xd....agradesco la ayuda para el que sepa como es la adecuada utilizacion de while y su utilidad...

m0skit0:
Pon tu bucle y te lo explicamos. Seguramente tu condición está mal.

PD: no olvides las etiquetas de código...

calichecal:

--- Cita de: "m0skit0" ---Pon tu bucle y te lo explicamos. Seguramente tu condición está mal.

PD: no olvides las etiquetas de código...
--- Fin de la cita ---


 Private Sub Command1_Click()                                
 Dim a as integer                                              
 a = text1.text
  while a < 10
 text1.text =  val (a) + 1
wend
end sub

Private Sub Timer1_Timer()             [propiedad interval  =  1000]
text1.text = val(text1.text) + 1
end sub

m0skit0:
¿Y las etiquetas de código? Mira que lo repito veces y soy pesao  :lol:

Fíjate que tú pones como condición de que se repita el bucle a < 10. Y repites


--- Código: Visual Basic ---text1.text = val (a) + 1 Este código no cambia el valor de a, por tanto a será siempre el valor de text1.text antes de empezar el bucle. Por tanto nunca llegará a ser mayor que diez. Por tanto nunca sales del bucle.

calichecal:

--- Cita de: "m0skit0" ---¿Y las etiquetas de código? Mira que lo repito veces y soy pesao  :lol:

Fíjate que tú pones como condición de que se repita el bucle a < 10. Y repites


--- Código: Visual Basic ---text1.text = val (a) + 1 Este código no cambia el valor de a, por tanto a será siempre el valor de text1.text antes de empezar el bucle. Por tanto nunca llegará a ser mayor que diez. Por tanto nunca sales del bucle.
--- Fin de la cita ---
HABER SI ENTENDI  : ES COMO SI EN A QUEDARA CON EL VALOR  DEL TEXT1.TEXT DE CUANDO EMPEZO EL BUCLE? :wacko:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa