En el modulo:
Código
Module Module1 'Aca se crea el timer Public MyTimer As New System.Timers.Timer(1000) '1000 es el intervalo en milisegundos 'Este es el procedimiento que ejecutara el timer Public Sub CodeToRun() 'Tu codigo aca End Sub End Module
Y en el load del formulario:
Código
AddHandler MyTimer.Elapsed, AddressOf CodeToRun 'Le decimes que cuando termine de contar ejecute el procedimiento CodeToRun MyTimer.Start() 'Iniciamos el timer
Espero te sirva.
Saludos