vb点虐跨线程访问跨线程访问ui

VB.NET跨线程操作控件

最简单的方法是

成都创新互联公司是一家专注于网站制作、做网站与策划设计,龙泉网站建设哪家好?成都创新互联公司做网站,专注于网站建设10多年,网设计领域的专业建站公司;建站业务涵盖:龙泉等地区。龙泉做网站价格咨询:028-86922220

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Control.CheckForIllegalCrossThreadCalls = False'加入这句代码就可以在别的线程访问窗体控件了

End Sub

Dim a() As String

For Each Node1 As TreeNode In TreeView1.Nodes

If Node1.Text = "SiteStructure" Then '如果根节点=SiteStructure 则Node1.Name改为Node1.Text

Dim cp As TreeNode = TreeView1.Nodes(0) '根节点

'先要给a赋值,举个例子吧,你自己根据情况变通一下

ReDim a(cp.Nodes.Count)

For i As Integer = 0 To a.Length - 1

a(i) = TreeView1.Nodes(i).Text

If a.Length = 1 Then

cp.Nodes("root").Nodes.Add(a(0))

Application.DoEvents()

Else

For k1 As Integer = 0 To a.Length - 1

Dim tc As New TreeNode(a(k1))

cp.Nodes.Add(tc)

Application.DoEvents()

cp = tc

End If

用 Control.Invoke 方法

比如

label1.Invoke(delegate(){ label1.Text = "New Text"; });

网站标题：vb点虐跨线程访问跨线程访问ui
路径分享：http://scyanting.com/article/ddihcpg.html