Private Sub cboServer_TextChanged(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles cboServer.TextChanged
        .....
        Dim Thread As New Threading.Thread(AddressOf OpenScript)
 
        Thread.Start(DRIVERSCRIPT)
        'DRIVERSCRIPT ist ein String
        .....
    End Sub

 Private Sub OpenScript(ByVal sAnwendung As String)
        Dim startInfo As New ProcessStartInfo(sAnwendung)
        Dim i
        startInfo.WindowStyle = ProcessWindowStyle.Minimized
        startInfo.Arguments = cboServer.Text
        startInfo.UseShellExecute = True
        i = Process.Start(startInfo)
    End Sub