Visual Basic.NET - Activar un boton al pasar 30 segundos

' Al initial de la pagina de los códigos, escribo la declaracion :

    Dim WithEvents ContarDuracion As New Timer

' Despuès, escribo el procedimiento para este Timer :

    Private Sub ContarDuracion_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ContarDuracion.Tick

        ContarDuracion.Stop()

        Button1.Enabled = True     ' activar el boton

    End Sub

' Y en el procedimiento del Click del botón, al momento donde debemos lo desactivar, escribo :

'... ... ...

        Button1.Enabled = False     ' desactivar el boton

        ContarDuracion.Interval = 5000   ' 30000 millisegundos, = 30 segundos

        ContarDuracion.Start()

' ... ... ...