Visual Basic - do... loop

Life is soft - evento anual de software empresarial
 
Vista:

do... loop

Publicado por juan (13 intervenciones) el 12/11/2016 00:39:09
hola, alguen me podria explicar como es que funciona esto?
quiero saver como funciona esto, se que es para poner en pausa algo
lo que no entiendo es que es "timer" y que valor tiene "controlar" si en ningun momento le di un valor,no entiendo el bucle

1
2
3
4
5
6
7
8
9
Private Sub pausa()
   Dim comenzar
   Dim controlar
   comenzar = Timer
   Do Until controlar >= comenzar + 1.5
      controlar = Timer
      DoEvents
   Loop
End Sub

gracias!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 3.932
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

do... loop

Publicado por Andres Leonardo (1739 intervenciones) el 14/11/2016 16:20:47
1
2
3
4
5
6
7
8
9
Private Sub pausa()
   Dim comenzar
   Dim controlar
   comenzar = Timer  ' primero da el valor a comenzar ..... ahora no se que valor ya viene de otra parte  pero supongamos n segundos
   Do Until controlar >= comenzar + 1.5  ' hasta q controlar sea mayor o igual  a comenzar +1.5 quizas entiendo podria ser Un segundo y me dio
      controlar = Timer va actualizando el valor controlar para manejar la pausa.
      DoEvents ' do events es como esperar.
   Loop ' vuelvo a vlisdar para ya salgo 
End Sub

En si tu codigo .. espera parece un segundo y medio mas de un valor de timer que envian

Espero te sirva... Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar