Visual Basic VB.Net-GUI暫停復選框

Question

我試圖創建一個復選框，單擊該復選框將暫停當前功能。 這是我的代碼設置方式-

Public Function Wait()
    LogOutput("Application paused.")
    Do Until waitBox.Checked = False
        'Task.Delay(1000)
        My.Application.DoEvents()
    Loop
    LogOutput("Application unpaused.")
Return Nothing
End Function

---

Public Function Thing()
   For Each i In x
      If waitBox.Checked Then
          Wait()
      Else
          DoStuff()
      End If
   Loop
Return Nothing
End Function

如您所見，我已經嘗試了“ Task.Delay”和“ DoEvents（）”，但是問題是該函數運行時GUI被鎖定，因此用戶根本無法單擊暫停。

我該如何解決？

提前致謝。

Answer 1

您需要為此創建一個新線程，因此GUI不會被鎖定： https : //msdn.microsoft.com/zh-cn/library/system.threading.thread(v=vs.110).aspx