VB.NET跨線程操作控件

最簡(jiǎn)單的方法是

創(chuàng)新互聯(lián)2013年至今，先為江城等服務(wù)建站，江城等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為江城企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

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

Control.CheckForIllegalCrossThreadCalls = False'加入這句代碼就可以在別的線程訪問(wèn)窗體控件了

End Sub

vb.net treeview 跨線程訪問(wèn)

Dim a() As String

For Each Node1 As TreeNode In TreeView1.Nodes

If Node1.Text = "SiteStructure" Then '如果根節(jié)點(diǎn)=SiteStructure 則Node1.Name改為Node1.Text

Dim cp As TreeNode = TreeView1.Nodes(0) '根節(jié)點(diǎn)

'先要給a賦值,舉個(gè)例子吧,你自己根據(jù)情況變通一下

ReDim a(cp.Nodes.Count)

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

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

Next

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

Next

End If

End If

Next

vb.net如何跨線程訪問(wèn)控件

用 Control.Invoke 方法

比如

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

請(qǐng)教VB.net中怎么跨線程調(diào)用控件.

建立委托。

Me.Invoke——同步委托

或者 Me.BeginInvoke——異步委托

例：Me.Invoke(Sub

Textbox.Text="這是一個(gè)示例"

End Sub)