vb.net – 如何在Visual Basic中逐行输出命令提示符窗口？

发布时间：2020-12-17 00:10:01 所属栏目：大数据来源：网络整理

导读：我试图逐行获取命令行输出,直到输出结束,但我无法这样做.我在我的表单中使用它,此代码在单击按钮时执行. 你能告诉我我的代码有什么问题吗？ Dim proc As ProcessStartInfo = New ProcessStartInfo("cmd.exe") Dim pr As Process proc.CreateNoWindow = True

我试图逐行获取命令行输出,直到输出结束,但我无法这样做.我在我的表单中使用它,此代码在单击按钮时执行.
你能告诉我我的代码有什么问题吗？

Dim proc As ProcessStartInfo = New ProcessStartInfo("cmd.exe")
    Dim pr As Process
    proc.CreateNoWindow = True
    proc.UseShellExecute = False
    proc.RedirectStandardInput = True
    proc.RedirectStandardOutput = True
    pr = Process.Start(proc)
    pr.StandardInput.WriteLine("cd C:sdkplatform-tools")
    pr.StandardInput.WriteLine("adb help")
    Dim helpArray(20) as String
    For i as Integer 1 To 7
    helpArray(i) = pr.StandardOutput.ReadLine()
    Next
    pr.StandardOutput.Close()

执行此代码时程序停止响应.

我做了一些研究. adb help将输出写入STDERR.所以你需要这样的东西：

Dim proc As ProcessStartInfo = New ProcessStartInfo("cmd.exe")
    Dim pr As Process
    proc.CreateNoWindow = True
    proc.UseShellExecute = False
    proc.RedirectStandardInput = True
    proc.RedirectStandardOutput = True
    pr = Process.Start(proc)
    pr.StandardInput.WriteLine("C:sdkplatform-tools")
    pr.StandardInput.WriteLine("adb help 2>&1")
    pr.StandardInput.Close()
    Console.WriteLine(pr.StandardOutput.ReadToEnd())
    pr.StandardOutput.Close()

抓住它.例如,如果你调用ipconfig,则不需要2>& 1.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!