RELOGIO TEXT
Pessoal coloquei um campo de hora na tela .
mais fica congelado a Hora
nao tem como , start e ficar continuo o comando time num text com o tempo rodando com form aberto ?
obrigado !
mais fica congelado a Hora
nao tem como , start e ficar continuo o comando time num text com o tempo rodando com form aberto ?
obrigado !
Adicione um controle TIMER no projeto, altere a propriedade INTERVAL para 1000 e escreva o código abaixo no evento TIMER do mesmo.
Label1.Caption = Time
Fácil...
Coloque um timer, com a propriedade Interval = 1000
e no timer coloque:
Private Sub Timer1_Timer()
text1.text = Format(Date, [Ô]dd[Ô]) & [Ô] de [Ô] & Format(Date, [Ô]mmmm[Ô]) & [Ô] de [Ô] & Format(Date, [Ô]yyyy[Ô]) & [Ô] - [Ô] & Format(Time, [Ô]hh:nn:ss[Ô])
End Sub
Ainda de lambuja vai com a data... rsrsr
Coloque um timer, com a propriedade Interval = 1000
e no timer coloque:
Private Sub Timer1_Timer()
text1.text = Format(Date, [Ô]dd[Ô]) & [Ô] de [Ô] & Format(Date, [Ô]mmmm[Ô]) & [Ô] de [Ô] & Format(Date, [Ô]yyyy[Ô]) & [Ô] - [Ô] & Format(Time, [Ô]hh:nn:ss[Ô])
End Sub
Ainda de lambuja vai com a data... rsrsr
Private Sub Timer2_Timer()
Text9.Text = Time
End Sub
blz Obrigado !!!
tinha colocado somente Text9.Text = Time
agora com o timer o relogio ando
Abs
Marcelo e Tecla
Marcelo Fazan
Text9.Text = Time
End Sub
blz Obrigado !!!
tinha colocado somente Text9.Text = Time
agora com o timer o relogio ando
Abs
Marcelo e Tecla
Marcelo Fazan
Tópico encerrado , respostas não são mais permitidas