2

我有以下测试代码。它没有任何用处，但我可以理解 VB： 

Imports System
Imports System.IO
Imports System.Diagnostics
Imports Microsoft.VisualBasic
Imports System.Threading

Public Class Sandbox
    Public Shared num As NumericUpDown

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim objWrk As Worker
        objWrk = New Worker
        objWrk.Show()
    End Sub
End Class

Public Class Worker
    Public Sub Show()
        Dim runThread As New System.Threading.Thread(AddressOf Run)      ' Call the runner in a seperate thread
        runThread.Start()
    End Sub

    Public Sub Run()
        runToggle(1000)
    End Sub

    Public Delegate Sub runToggleInvoker(ByVal value As Integer)
    Public Sub runToggle(ByVal value As Integer)
        If Sandbox.Label1.InvokeRequired = True Then
            Sandbox.Label1.Invoke(New runToggleInvoker(AddressOf runToggle), value)
        Else
            Sandbox.Label1.Text = value
        End If
    End Sub
End Class

表格由 aButton和 a组成Label。

仅出于学习目的，我已将更改标签中文本的方法放在另一个线程中。然而，InvokeRequired价值不断返回False。这怎么可能？它Label1是在主线程中创建的，并且正在 runThread 中进行调整，因此InvokeRequired应该给出 True。

在这里，我读到当尚未创建表单句柄时会发生这种情况，因此我更改了Run方法：

Public Sub Run()
            Sandbox.Show()
            runToggle(1000)
        End Sub

这并不能解决问题。

4

1 回答 1

3

根据Control.InvokeRequired 属性

如果控件的句柄尚不存在，InvokeRequired 将向上搜索控件的父链，直到找到具有窗口句柄的控件或窗体。如果找不到合适的句柄，则 InvokeRequired 方法返回false。

于 2012-05-24T08:38:59.507 回答