[vb6] timer maior

[thrash metal]

eu preciso fazer que o timer tenha um tempo maior que 1 minuto mais não ta dando certo vejam:

Dim t As Date

Minute (t = t + 1)
If t = Timer2.Interval Then
Timer2.Interval = t
Timer2 = True
End If

amlguém pode ajudar?

[Jonathan Queiroz]

O máximo valor aproximado para um timer é de um minuto e 5 segundos (mais precisamente, 65535 segundos). Isso porque a propriedade Interval é um inteiro sem sinal (unsigned int)

O que você pode fazer é um loop para ver esse timer várias vezes.

Você pode declarar uma variável que conta quantas vezes o timer já passou e.