求教VB.net多線程問題

多線程是用于處理復(fù)雜項(xiàng)目的

創(chuàng)新互聯(lián)長(zhǎng)期為上千多家客戶提供的網(wǎng)站建設(shè)服務(wù)，團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年，關(guān)注不同地域、不同群體，并針對(duì)不同對(duì)象提供差異化的產(chǎn)品和服務(wù)；打造開放共贏平臺(tái)，與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為江安企業(yè)提供專業(yè)的成都網(wǎng)站建設(shè)、做網(wǎng)站，江安網(wǎng)站改版等技術(shù)服務(wù)。擁有十載豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開發(fā)。

打個(gè)比方

你的主程序線程A中有個(gè)循環(huán)，由于代碼是一行行走的，所以循環(huán)結(jié)束前下面的代碼無法運(yùn)行，而此時(shí)主界面的反應(yīng)就類似卡死的樣子，你點(diǎn)擊按鈕也沒有反應(yīng)，因?yàn)橹骶€程在忙著循環(huán)呢，所以對(duì)按鈕的事件代碼要等待了，如果要避免這種情況，就要用到多線程，另開一個(gè)新線程專門用來執(zhí)行循環(huán)代碼，主界面就不會(huì)卡死了，只要在循環(huán)結(jié)束后將結(jié)果傳回主線程調(diào)用就可以了，再復(fù)雜點(diǎn)要涉及到委托，控制了

按你的要求其實(shí)你的代碼用不到多線程，只要把sleep放到兩段代碼中間就可以了。

新線程結(jié)束用thread.abort()

VB.NET跨線程操作控件

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

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

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

End Sub

VB.net多線程編程問題

你可以在timer前用if判斷網(wǎng)絡(luò)狀態(tài)，

如斷開，可用

threading.Thread.Sleep（10000） ‘當(dāng)前線程掛起10秒

’可以開一個(gè)新線程去讀取脫機(jī)數(shù)據(jù)。

如連接，則繼續(xù)執(zhí)行。

補(bǔ)充：

dim i as integer

'超過100次退出，避免死循環(huán)

for i=0 to 100

try

'ping你的端口

if ‘ok

exit for

else

threading.Thread.Sleep（10000） ‘當(dāng)前線程掛起10秒

end

Catch ex As Exception

End Try

next

在vb.net中，多線程如何使用

Sub Main() Dim thr As New Thread(AddressOf 循環(huán)) thr.Start("a") End Sub Sub 循環(huán)(a() As String) '這里隨你干什么循環(huán)也行 For Each i As String In a MsgBox(i) Next End Sub

vb.net里如何設(shè)置多線程?

首先，你把你那些要運(yùn)行很久的過程。盡量放在一個(gè)過程中。

因?yàn)榫€程只能是過程，不能使函數(shù)，沒有返回值的。

然后，在某個(gè)事件下這樣寫：

**這里我假設(shè)你的那個(gè)很就的過程叫做 sub aaa()

調(diào)用如下：

Dim mythread As New System.Threading.Thread(AddressOf aaa)

mythread.Start()

***********

這樣就是定義一個(gè)線程，名字叫 mythread，這個(gè)線程會(huì)運(yùn)行aaa這個(gè)過程。

start 就是讓線程運(yùn)行。

VB.NET 的 后臺(tái)線程（主線程）如何讓它所屬的主線程執(zhí)行一個(gè)方法或事件（可以再附加分）

其實(shí)最簡(jiǎn)單的方法是設(shè)置一個(gè)全局的變量，然后加一個(gè)timer，不停顯示最新的變量值