佛系糖果的博客

行到水穷处，坐看云起时

0%

VB.net 多线程委托，更新控件值

发表于 分类于 阅读次数： Valine：
本文字数： 234 阅读时长 ≈ 1 分钟

下面演示在多线程情况下为Label控件赋值值

1
2
3
4
5
6
7
8
9
10
11
12
Delegate Sub Gxdjs(data As String) '定义委托

Private Sub Djs(n As String)
    Me.Invoke(New Gxdjs(AddressOf Cdjs), n) '用Invoke跨线程更新UI
End Sub

Private Sub Cdjs(data As String) '这里要和委托定义时的参数保持一致
    Label5.Text = data
End Sub

'线程中使用
Djs("3")
觉得文章有用？请我喝杯咖啡~