TIMER - CRONOMETRO REGRESSIVO
Estou a precisar de fazer um cronometro que me conte desde, por exemplo "01:23:09" horas até "00:00:00", isto apresentando os resultados ao utilizador.
Mas não sei o que colocar no timer para subetrair o tempo que está escrito numa label "01:23:09".
Obrigado ;)
Mas não sei o que colocar no timer para subetrair o tempo que está escrito numa label "01:23:09".
Obrigado ;)
Simples, coloque um timer com intervalo de 1000 e o código:
PS: Se quiser dê uma olhada no manual do VBM sobre o DateAdd
Qualquer dúivida poste...flw
Private Sub timer1_timer()
'Tira um segundo
Label1.Caption = DateAdd("S", -1, CDate(Label1.Caption))
'Verifica se terminou a contagem, se chegou no 00:00:00
If CDate(Label1.Caption) = Empty Then
Timer1.Enabled = False
MsgBox "Fim da contagem!"
End If
End Sub
PS: Se quiser dê uma olhada no manual do VBM sobre o DateAdd
Qualquer dúivida poste...flw
Vou experimentar.
Vlw! ;)
Vlw! ;)
Citação:RITA escreveu:
Vou experimentar.
Vlw! ;)
^^
RITA, editei o tÃtulo do seu tópico pois "PERGUNTA SUSPEITA..." não tinha muito a ver, espero que não se importe...flw
lol ok. dsclpa, é k fikei um pouco amoada com uma 'ajuda' que recebi noutro thread.
Vlw!
Vlw!
só não esqueça de encerrar o tópico se a dica do Matioli lhe ajudou!!
Tópico encerrado , respostas não são mais permitidas