• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

vox_pt

[Encerrar]

5 mensagens neste tópico

pessoal eu queria quando o timr fosse 00:00:10 o contador volta-se a 0:00:00 e tivesse sempre nisto(um ciclo)

tenho o código assim:

Dim X As Variant
Dim C As Variant
Dim B As Date
Dim Y As Date

Private Sub Timer2_Timer()
Y = Time - X
Label6.Caption = Y
Label4.Caption = Y

pronto isto começa do zero quando carregamos o programa(no load da form) eu queria quando fosse aos 10 segundos começa de novo como fazaer?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Para pores o tempo correr de 10 em 10 segundo basta fazeres isto:

Private Sub Command1_Click()

End

End Sub

Private Sub Command2_Click()

Label1.Caption = 10

End Sub

Private Sub Timer1_Timer()

If Label1 <> "0" Then

  Label1.Caption = Label1 - 1

End If

End Sub

Nota o intervalo do timer tem que ser 1000

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

bem... para executar um comando de 10 em 10 segundos em vez de estar a fazer tudo isso porque não mete logo 10000 no interval do timer.

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

bem... para executar um comando de 10 em 10 segundos em vez de estar a fazer tudo isso porque não mete logo 10000 no interval do timer.

Cumps

lá está pk os 10000 ms =10s

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora