建立委托。 Me.Invoke——同步委托 或者 Me.BeginInvoke——異步委托 例:Me.Invoke(Sub Textbox.Text="這是一個(gè)示例" End Sub)
創(chuàng)新互聯(lián)公司長(zhǎng)期為上1000+客戶(hù)提供的網(wǎng)站建設(shè)服務(wù),團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年,關(guān)注不同地域、不同群體,并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù);打造開(kāi)放共贏(yíng)平臺(tái),與合作伙伴共同營(yíng)造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為靖江企業(yè)提供專(zhuān)業(yè)的成都做網(wǎng)站、網(wǎng)站制作,靖江網(wǎng)站改版等技術(shù)服務(wù)。擁有10余年豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開(kāi)發(fā)。
建議你使用BackGroundWorker控件。將代碼寫(xiě)入控件的事件中,使用它的Start方法就可以開(kāi)始工作了。是與主程序同時(shí)進(jìn)行的。
用 Control.Invoke 方法
比如
label1.Invoke(delegate(){ label1.Text = "New Text"; });
invoke?不是創(chuàng)建線(xiàn)程,功能類(lèi)似于?call?,還有設(shè)置?Control.CheckForIllegalCrossThreadCalls?=?false?是能讓線(xiàn)程不安全訪(fǎng)問(wèn)控件(兩個(gè)線(xiàn)程同時(shí)訪(fǎng)問(wèn)同一控件時(shí)可能會(huì)造成死鎖)而不引發(fā)錯(cuò)誤.創(chuàng)建線(xiàn)程可以用?threading.thread?類(lèi)?,?BackgroundWorker?控件?,?線(xiàn)程池?,?委托?.
最簡(jiǎn)單的方法是
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Control.CheckForIllegalCrossThreadCalls = False'加入這句代碼就可以在別的線(xiàn)程訪(fǎng)問(wèn)窗體控件了
End Sub
不可以,但是能夠在主線(xiàn)程的基礎(chǔ)上調(diào)用委托(Invoke)。(主線(xiàn)程會(huì)被占用)
例子:
Dim thr As Threading.Thread
Public Delegate Sub VoidDelegate()
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
thr = New Threading.Thread(AddressOf Where)
thr.Start()
End Sub
Public Sub Where()
Me.BeginInvoke(New VoidDelegate(AddressOf WhereThr))
End Sub
Public Sub WhereThr()
Me.TextBox.text="0123456789"
End Sub
(Invoke)這種情況下,主線(xiàn)程被占用,所有由主線(xiàn)程執(zhí)行程序,都將被(wherethr函數(shù)執(zhí)行結(jié)束)后執(zhí)行。