Pessoal eu desenvolvi um aplicativo para migrar dados de banco Access para MySql e preciso mostrar em uma label o tempo decorrido em segundos tentei usando o timer, mas não está dando certo!

Tipo: os segundos vão correndo enquanto migra os dados.
Alguem pode me ajudar?

Obrigado!

Pq o timer não deu certo?? Como vc fez??

na verdade eu não sei quel a propriedade usa do timer, nunca precisei fazer algo assim

ah... blz

Olha tenta fazer assim... qdo vc disparar o procedimento de migração inclua

Timer1.Interval = 1000

 

Dessa forma vai o tiimer irá de segundo em segundo

 

No evento Timer vc soma 1 a uma variável chamada tempo:

 

Dim Tempo as long

 

Private Sub Timer1_Timer()

Tempo = Tempo + 1

End Sub

 

Depois faz os cálculos para mostrar o tempo em hh:mm:ss

 

ou pode utilizar de outro modo. Ao disparar o procedimento de migração pega a hora do computador e qdo acabar grava a hora de término. Depois subtrai:

 

msgbox "Tempo de duração: " & MsgBox DateAdd("s", DateDiff("s", HORA_INICIAL, HORA_FINAL), "00:00:00")

 

BLZ??

 

t+