Adicionando Pause (VB)

    Compartilhe
    avatar
    Thales12
    Administrador
    Administrador

    Mensagens : 140
    Level : 8
    Data de inscrição : 01/11/2011
    Idade : 23
    Localização : Rio de Janeiro

    default Adicionando Pause (VB)

    Mensagem por Thales12 em Sex Fev 17, 2012 4:37 pm

    Estava mechendo no Eclipse Origins e achei necessidade de colocar um Pause na sub (funciona em funções), funciona da seguinte maneira:
    Spoiler:
    [códigos]
    [códigos]
    Pause de 5 segundos
    [códigos]
    [códigos]
    Ele irá rodar os códigos normalmente e quando chegar no Pause, ele esperará um determinado tempo, no caso 5 segundos, e continuará a rodar o resto dos códigos.

    Como fazer:
    Ache a sub ou função aonde deseja colocar o Pause, declare uma variável "TP As Long", após declará-la, adicione as seguintes linhas aonde quiser que dê o Pause:
    Spoiler:
    Código:
    TP = 5000 + GetTickCount
    Do While TP > GetTickCount
    Loop

    Obs: o número 5000 representa 5000 milésimos de pausa, mude-o pelo número desejado.

    Isso é um código bem simples mas que em certas horas (raras) pode ser útil Smile

      Data/hora atual: Dom Out 21, 2018 2:16 am