Private Sub Button1_Click(sender As Object, e As EventArgs) Handles _
  Button1.Click
        GetAll("\")
    End Sub
 
 
    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" Then
                ' Hir soll der Task deaktiviert werden
            End If
        Next
    End Sub