穿线。按钮单击如何中断/影响程序流程

Question

我的项目是vb.net 2010 windows桌面形式。 到目前为止，单线程（默认）。

如果 SUB 例程中有一个正在运行的 for...next 循环，如果触发了 buttonclick 事件并且在该事件中更改了变量，会发生什么情况？比如：程序执行是否离开了正在运行的循环？还是在 buttonclick 事件更改该变量时继续运行？

我的目标是： 如果有人单击该按钮，则 blnRequestStop 设置为 True。 在 for...next 循环中，就在“next”之前，它检查 blnRequestStop。如果为真则退出“for”循环。

我猜我需要使用线程？谁能给我一个简单的例子，好吗？

编辑： 下面的这段代码似乎工作正常。但也许你们都看到了问题？

If (btnProcess.Text = "Done!") Then
    End
ElseIf (btnProcess.Text = "IMPORT") Then
    bRequestStop = False
    t1 = New Thread(AddressOf ProcessDo)
    t1.Start()
Else
    t2 = New Thread(AddressOf MyInterrupt)
    t2.Start()
End If

下面是 ProcessDo 和 MyInterrupt 的简短版本：

Private Sub ProcessDo()
    For each X in blahblah
        'do stuff (yes, includes interface)
        if (blnInterrupt) then exit For
    Next X
    End
End Sub

Private Sub MyInterrupt()
    blnInterrupt=true
End Sub

Answer 1

是的，您可能想在后台线程上执行长时间运行的任务。这是一个代码示例，包括在完成后如何将结果返回给 UI 线程（否则您将收到有关 Cross-thread operation not valid 的错误）。

ThreadPool 是在后台线程上做一些工作的好方法。您可以在停止按钮的按钮单击事件中设置stopIt = True。

ThreadPool.QueueUserWorkItem(
  Sub()
    For Each thing In things
      If stopIt Then Exit Sub
      'Do the stuff!
    Next

    'We're done, update UI
    Me.UpdateUI("All done!")
  End Sub)

要安全地更新 UI，您需要确保回到 UI 线程。

Public Sub UpdateUI(result As String)
  If Me.InvokeRequired() Then 
    'If we aren't on the UI thread, invoke this function on the UI thread
    Me.BeginInvoke(Sub() UpdateUI(result))
    Exit Sub
  End If

  'Update UI here
  lblResult.Text = result
End Sub

Answer 2

执行是'停止'（在某种程度上）直到循环完成他的工作，所以是的，你需要多线程。

这不是一个很长的操作，您需要在循环期间更新 UI 控件，然后您可以在循环内使用 Application.DoEvents 以便能够在 FOR 循环时在应用程序中正常使用其他控件工作，但我建议您这将对 UI 性能产生负面影响，但如果它不是一个持续时间较长的循环，那么您可能会考虑使用DoEvents 而不是引入multi-threading 这只是一种替代方案，不推荐但是，你可以使用它。

PS：原谅我的英语