0

因此，我正在尝试创建一个应用程序，该应用程序根据文件名列表启动第 3 方 exe 来执行一些文件操作。因此，如果列表有 13 个项目，我将循环 13 次，每次启动外部进程，通知用户现在正在处理哪个文件，启动进程并等待它退出。为了通知用户，另一个列表框用作喊话框。问题是， .waitforexit() 以某种奇怪的方式冻结了整个线程，因此外部程序被正常调用，文件被正常处理，但主窗口被冻结，直到所有项目都完成。所以基本上 Shoutbox 被冻结并且只有在整个循环完成后才会收到所有信息的垃圾邮件。我尝试了很多方法来实现这一点，例如启动新线程、使用线程池、计时器等等。任何帮助表示赞赏。代码：

Imports System.Windows.Threading
Imports System.Windows.Forms
Imports System.IO
Imports System.Threading        

If Listbox2.Items.Count > 0 Then
            tabctrl.SelectedIndex = 2
            Listbox3.Items.Add(DateTime.Now.ToString & ": Process initiated.")
            For i = 0 To Listbox2.Items.Count - 1
                Listbox3.Items.Add(DateTime.Now.ToString & ": Processing :" & Listbox1.Items.Item(i))
                If System.IO.File.Exists(Listbox2.Items.Item(i)) = False Then
                    Dim pInfo As New ProcessStartInfo()
                    With pInfo
                        .WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden
                        .FileName = System.IO.Directory.GetCurrentDirectory & "\" & "myapp.exe"
                        .argouments = "w/e"
                    End With
                    Dim p As Process = Process.Start(pInfo)
                    p.WaitForExit()
                    p.Dispose()
                Else
                    Listbox3.Items.Add(DateTime.Now.ToString & ":! " & Listbox2.Items.Item(i) & " already exists. Moving to next file..")
                End If
            Next
            Listbox3.Items.Add("*-*")
            Listbox3.Items.Add(DateTime.Now.ToString & ": Done.")
        End If
4

1 回答 1

3

问题是您（至少在您发布的代码中）正在调用WaitForExit()UI 线程。UI线程负责重绘窗口，所以如果你阻止它，WaitForExit()例如通过调用，它不会重绘ui并且应用程序似乎被冻结。

您需要做的是在另一个线程或线程池上调用它，我建议使用Tasks：

Task.Run( Sub()
  Dim p As Process = Process.Start(pInfo)
  p.WaitForExit()
End Sub)

但是，由于您没有对Process.Start()调用结果进行任何操作，因此您也可以考虑根本不调用WaitForExit()。

由于您使用的是 VS2013，您还可以使用await 运算符等待该过程完成：

await Task.Run( Sub()
  Dim p As Process = Process.Start(pInfo)
  p.WaitForExit()
End Sub)

请注意，您还必须将async关键字添加到周围的方法中

于 2013-10-13T14:47:09.190 回答