VB.Net 无法使用 For 循环从另一个表单更改 Label.text

如何解决VB.Net 无法使用 For 循环从另一个表单更改 Label.text

我正面临一个非常令人不安的错误，我已经工作了 6 个小时。问题来了：

Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click
    Dim i As Integer
    frmProgress.Show()
    frmProgress.Label1.Text = "mmm"
    For i = 1 To 10
        Threading.Thread.Sleep(500)
        frmProgress.Label1.Text = i.ToString
        'MsgBox(i)
    Next
End Sub

当我单击 Form1 中的 Button1 时，表单 frmProcess 中 Label1 的文本应该会发生变化。如果没有上面代码中的 For 循环，这没有问题，Label1 的文本将变为“mmm”（这意味着我可以从 Form1 访问 Label1 的文本属性）：

enter image description here

但是一旦包含 For 循环（以及具有相同问题的 Do while 循环），我期望 Label1 的文本每 0.5 秒增加一次，但从现在起没有任何效果：

enter image description here

它只在循环结束时获取 i 值：

enter image description here

但是如果我添加一个消息框来弹出每一步的 i 值，一切都会再次运行：

enter image description here

我真的希望有人知道原因并能帮我解决这个问题，经过 6 个小时的调试，我一头雾水。感谢所有可能提供帮助的人！

该项目是一个带有.net框架的VB.net Winform应用程序，IDE是Visual Studio 2019。

解决方法

Winforms 是一个事件驱动的平台，包括窗口绘制。当您让当前 (ui) 线程进入睡眠状态时，当线程返回时，您不会给它做任何其他事情的机会，包括更新 UI。

弹出窗口可以工作，因为它们有自己的处理方式，允许在窗口关闭之前更新它们。

对于进度/通知，您需要一个后台工作人员，它将有一个回调函数，您可以在其中更新屏幕。