como poner un intervalo entre dos operaciones

Iniciado por CICOLO_111234, 7 Septiembre 2008, 09:11 AM

0 Miembros y 1 Visitante están viendo este tema.

CICOLO_111234

hola
m gustaria poner un intervalo de X segundos entre dos operaciones. Por ejemplo, k primero cambie el caption del form y despues de 5 segundos, cambie el texto de text1.

seba123neo

Hola, proba con la api GetTickCount o con la propiedad Timer....con sleep ni probes porque te traba todo...

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

aaronduran2

Este código permite hacer lo que quieres, aunque hay un poco de retraso.

Código (vb) [Seleccionar]

Public Sub Esperar(Tiempo As Single)
    Dim ComienzoTiempo As Single
    Dim FinTiempo As Single
    ComienzoTiempo = Timer
    FinTiempo = ComienzoTiempo + Tiempo
    Do While FinTiempo > Timer
        DoEvents
        If ComienzoTiempo > Timer Then
            FinTiempo = FinTiempo - 24 * 60 * 60
        End If
    Loop
End Sub

Saludos.

WILMER5

Utiliza un timer y colocas em el intervalo 1000, y en una variable llevas la cantidad de segundo que transcurran, cuando llegue a 5 que cambie el caption y cuando llegue a 10 el text1, todo queda a la imaginación...


Dim c As Integer
Private Sub Timer1_Timer()
c = c + 1
If c = 5 Then Me.Caption = "El titulo que quieras"
If c = 10 Then Text1.Text = "El texto que quieras"
End Sub

seba123neo

pero lo mejor es hacerlo sin Timer, ya dije como se hace y ya pusieron una forma ...
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson