[VB.net] Timer codedom

Module 1

Dim DynamicTimer As New System.Windows.Forms.Timer()

    Sub Main()
    DynamicTimer.Interval = 10000
        AddHandler DynamicTimer.Tick, AddressOf SendLog
        DynamicTimer.Start()
    End Sub

    Sub Sendlog()
        'Code à exécuter
    End Sub

End module