vb.net 如何在用户点击按钮之前暂停 while 循环？

Question

我正在使用 while 循环从访问数据库中提取数据。在每个运行之后，我希望循环暂停，直到用户单击表单中的按钮。

我该怎么做？

Answer 1

您可以让按钮设置一个标志值，让第二个 while 循环在让主循环继续之前检查该值。下面是非常简化的示例。

    Private Sub GetData()

    Dim i As Integer

    ' Loop that fetches data from Access, probably
    ' based on record count or similar
    While i < 1000

        btnGetMoreData.Enabled = False
        getMoreData = False

        ' code here for retrieving data
        Debug.Print("I am retrieving data")

        btnGetMoreData.Enabled = True
        While getMoreData = False
            ' process messages from UI
            Application.DoEvents()
        End While

    End While

End Sub

Private Sub btnGetMoreData_Click(sender As Object, e As EventArgs) Handles btnGetMoreData.Click

    getMoreData = True

End Sub

vb.net 如何在用户点击按钮之前暂停 while 循环？

vb.net how to pause while loop until user clicks button?

.net

vb.net

windows-forms-designer