Public Sub GetAll(taskFolderPath As String)
        Dim taskService1 = New TaskScheduler.TaskScheduler
        taskService1.Connect()
        Dim taskFolder As ITaskFolder = taskService1.GetFolder(taskFolderPath)
        For Each task As IRegisteredTask In taskFolder.GetTasks(0)
            If task.Name = "test" AndAlso task.Definition.Settings.Enabled = _
              True Then
                task.Definition.Settings.Enabled = False
 
                MsgBox(task.Definition.Settings.Enabled)
            End If
        Next
    End Sub