DUVIDA COM TIMER
pessoal, faz 2 horas que to tentando fazer uma função axo q nem muito complicada com timer, mas nao estou conseguindo.
seria tipo um timer (pode ser + q1 tb se precisar) que faz duas funções mas nao no mesmo tempo.
tipo, tenho um textbox (txtBericht)
as duas funções seriam..
1- ativar (clicar) em um botao (Command1) depois de uns 5 minutos (no caso o textbox ja estaria preenchido)
2- uns 15 segundos depois esse timer fazer a função de apagar todo o textbox (txtBericht)
e ir repetindo essas duas funções mas sem que uma função seja feita primeira que a outra depois de um tempo, ou seja, axo q a 1°função só deveria voltar a funcionar
depois do termino da 2°.
a primeria função estou conseguindo fazer que é acionar o botão, mas não consigo dar continuidade..
obrigado
seria tipo um timer (pode ser + q1 tb se precisar) que faz duas funções mas nao no mesmo tempo.
tipo, tenho um textbox (txtBericht)
as duas funções seriam..
1- ativar (clicar) em um botao (Command1) depois de uns 5 minutos (no caso o textbox ja estaria preenchido)
2- uns 15 segundos depois esse timer fazer a função de apagar todo o textbox (txtBericht)
e ir repetindo essas duas funções mas sem que uma função seja feita primeira que a outra depois de um tempo, ou seja, axo q a 1°função só deveria voltar a funcionar
depois do termino da 2°.
a primeria função estou conseguindo fazer que é acionar o botão, mas não consigo dar continuidade..
obrigado
Private Sub Command1_Click()
MsgBox ([Ô]dawdawd[Ô])
End Sub
Private Sub Timer1_Timer()
If Timer1.Interval = 1000 Then
Timer1.Interval = 50000
Command1_Click
End If
If Timer1.Interval = 50000 Then
txtBericht.Text = [Ô][Ô]
Timer1.Interval = 1000
End If
End Sub
Tópico encerrado , respostas não são mais permitidas