我想在一个线程中显示工具提示,这是一个代码,我在没有线程的情况下编写它的工作正常
private sub button_click(sender as object,e As eventargs)
Dim th As New Thread(Addressof test)
th.start()
' tooltip.show('test',label1,1000) <--- this line work fine if i uncomment
End Sub
sub test()
tooltip.show('test',label1,1000)
End sub
除了创建它们的线程之外,您不能使用来自其他线程的 UI 控件。这是所有语言和所有操作系统的规则。
您必须在正确的线程上调用它:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim th As New Thread(AddressOf test)
th.Start()
End Sub
Sub test()
BeginInvoke(Sub()
ToolTip1.Show("test", Label1, 1000)
End Sub)
End Sub
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句