Private Sub Button3_Click(sender As Object, e As EventArgs) Handles _
   Button3.Click
 
        Dim ts As New TaskScheduler.TaskScheduler
        ts.Connect(Nothing, Nothing, Nothing, Nothing)
 
        Dim folder As ITaskFolder = ts.GetFolder("\Microsoft\Office")
        Dim hh As IRegisteredTask = folder.GetTask("test")
        hh.Enabled = False
    End Sub