Avisar Mudança Do Dia

[estrela666]

Olá fórum!

O meu nome é Liliana, tenho 22 anos e sou nova aqui no fórum!

Neste momento estou desenvolvendo um projecto em que o programa, quando for instalado no computador do cliente, não vai ser mais desligado nem o computador.

Eu preciso então de um código que me diga que o dia mudou. Pensei em criar uma variável que iria guardar o dia actual (ex.: 18) e um timer que iria ver se o dia seria maior que 18:

Private Sub Timer1_Timer()

If dia > Day Then

mdgbox "mudou o dia"

End If

End Sub

Mas precisamente por o programa ficar aberto "para sempre" é que eu não quero ter um timer sempre a correr.

Vocês não conhecem algum código que substitua o meu timer?

Grata pela atenção,

Liliana

[kuroi]

acho que so com timer, porque você tem que testar a cada segundo se mudou o dia, mas acho que isso não vai deixar muito pesado não.

outra coisa, é que esse seu codigo não vai funcionar quando mudar de mês já que 31 é maior que 1.

o mais certo era você comparar a data toda:

Private Sub Timer1_Timer()
If data <> Date Then
mdgbox "mudou o dia"
'também você devia mudar a variavel data dentro desse if, 
'mas você que sabe onde prefere fazer isso
End If
End Sub[/code]

[estrela666]

obrigado! :D