vb.net读取另一程序的标准输出

最新推荐文章于 2023-04-05 10:40:50 发布

zjkqxjsxb

最新推荐文章于 2023-04-05 10:40:50 发布

阅读量394

点赞数 1

CC 4.0 BY-SA版权

分类专栏： vb2008学习笔记

本文链接：https://blog.youkuaiyun.com/zjkqxjsxb/article/details/86485562

vb2008学习笔记专栏收录该内容

7 篇文章

订阅专栏

本文介绍如何使用C#代码访问一个进程的标准化输出，通过实例演示了如何使用Process类启动进程并读取其输出，同时提供了将此操作放入BackgroundWorker中以避免UI阻塞的方法。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

访问一个进程的标准化输出

 Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        Dim p = New Process

        p.StartInfo.FileName = "ping"
        p.StartInfo.Arguments = "www.baidu.net"
        ' 必须禁用操作系统外壳程序  
        p.StartInfo.UseShellExecute = False
        p.StartInfo.CreateNoWindow = True
        p.StartInfo.RedirectStandardOutput = True

        p.Start()
        Dim output = p.StandardOutput.ReadToEnd()


        If (String.IsNullOrEmpty(output) = False) Then
            TextBox1.AppendText(output + vbCrLf)
        End If
        p.WaitForExit()
        p.Close()
    End Sub

在进程的waitForExit期间，主程序是被等待的。可以把进程放到后台运行，新建一个BackgroundWorker部件，在按钮按下时运行

 Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        BackgroundWorker1.RunWorkerAsync()
    End Sub

    Private Sub BackgroundWorker1_DoWork(sender As System.Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
        Dim p = New Process

        p.StartInfo.FileName = "ping"
        p.StartInfo.Arguments = "www.baidu.net"
        ' 必须禁用操作系统外壳程序  
        p.StartInfo.UseShellExecute = False
        p.StartInfo.CreateNoWindow = True
        p.StartInfo.RedirectStandardOutput = True

        p.Start()
        Dim output = p.StandardOutput.ReadToEnd()


        If (String.IsNullOrEmpty(output) = False) Then
            Me.Invoke(Sub() TextBox1.AppendText(output + vbCrLf))
        End If
        p.WaitForExit()
        p.Close()
    End Sub