Dim myFile as String = "c:\sound\notepad.exe"      
        Dim Anwendung As System.Diagnostics.Process = New _
          System.Diagnostics.Process()
        With Anwendung.StartInfo
            .FileName = myFile
            .Arguments = myArgs
            .CreateNoWindow = False
            .UseShellExecute = False
            .Domain = "domain"
            .UserName = "sdepot"
            .Password = New System.Security.SecureString()
            For Each c As Char In "123pw"
                .Password.AppendChar(c)
            Next
        End With
 
        With Anwendung
            .Start()
            .WaitForExit()
        End With