现在我正在开发一个通过命令行通过Process
对象完成大量工作的工具。因此,有时我希望命令窗口不显示,以及我希望它保持打开的时间,以便用户可以看到发生了什么,可能会使用适当的输入进行响应。
Dim pro As New Process
pro.StartInfo.WorkingDirectory = path
pro.StartInfo.Arguments = command
pro.StartInfo.FileName = "hg"
pro.StartInfo.RedirectStandardOutput = True
If command.Contains("-q") Then
pro.StartInfo.UseShellExecute = False
pro.StartInfo.CreateNoWindow = True
pro.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
End If
pro.Start()
pro.WaitForExit()
Return pro.StandardOutput.ReadToEnd
我在command
中检查的标志是-q
,如果它不包含这个我想向用户显示命令提示符并等待它们关闭它。
这可能吗?如果可以,我错过了什么?
答案 0 :(得分:1)
If command.Contains("-q") Then
....
Else
Shell("cmd /k" & Command, 1, True)
End If