Dim _psi_cmd As New ProcessStartInfo("cmd.exe", "/K") With {
        .WorkingDirectory = _applicationPathNoSlash,
        .UseShellExecute = False,
        .RedirectStandardInput = True,
        .WindowStyle = ProcessWindowStyle.Normal
             }
    Dim _p_cmd As Process = Process.Start(_psi_cmd)
   _p_cmd.StandardInput.WriteLine("blabla")