vb.net多線程如何返回參數(shù)，舉個(gè)例子，謝謝

Public?Class?Form1

我們擁有10年網(wǎng)頁(yè)設(shè)計(jì)和網(wǎng)站建設(shè)經(jīng)驗(yàn)，從網(wǎng)站策劃到網(wǎng)站制作，我們的網(wǎng)頁(yè)設(shè)計(jì)師為您提供的解決方案。為企業(yè)提供成都做網(wǎng)站、成都網(wǎng)站制作、成都外貿(mào)網(wǎng)站建設(shè)、微信開(kāi)發(fā)、成都微信小程序、手機(jī)網(wǎng)站制作設(shè)計(jì)、H5頁(yè)面制作、等業(yè)務(wù)。無(wú)論您有什么樣的網(wǎng)站設(shè)計(jì)或者設(shè)計(jì)方案要求，我們都將富于創(chuàng)造性的提供專(zhuān)業(yè)設(shè)計(jì)服務(wù)并滿足您的需求。

Public?Class?SquareClass?'把多線程調(diào)用的函數(shù)封裝到類(lèi)中，通過(guò)類(lèi)事件返回

Public?Value?As?Double

Public?Square?As?Double

Public?Event?ThreadComplete(ByVal?Square?As?Double)

Public?Sub?CalcSquare()

Square?=?Value?*?Value

RaiseEvent?ThreadComplete(Square)

End?Sub

End?Class

Dim?WithEvents?oSquare?As?SquareClass

Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button1.Click?'多線程返回值測(cè)試，當(dāng)線程運(yùn)行完成激發(fā)事件

oSquare?=?New?SquareClass()

Dim?t?As?New?Threading.Thread(AddressOf?oSquare.CalcSquare)

oSquare.Value?=?30

t.Start()

End?Sub

Sub?SquareEventHandler(ByVal?Square?As?Double)?Handles?oSquare.ThreadComplete?'響應(yīng)事件函數(shù)

MsgBox("The?square?is?"??Square)

End?Sub

End?Class

VB.net 如何設(shè)計(jì)多線程運(yùn)行

Sub Main()

Dim thr As Thread

For Pi As Integer=0 To 4 //啟用5線程

MulParams =Pi vbTab sFile vbTab dFile vbTab 1 vbTab DelN vbTab cr vbTab cg vbTab cb vbTab IndexI

GlobalParamas(pi)=MulParams .Split(vbTab)

thr=New Thread(AddressOf MyMulThreadCaller)

thr.Start() //啟動(dòng)多線程進(jìn)程

Application.DoEvents

Next

End Sub

VB.net多線程編程問(wèn)題

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

如斷開(kāi)，可用

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

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

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

補(bǔ)充：

dim i as integer

'超過(guò)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里用多線程縮短循環(huán)時(shí)間

多線程并不一定就可以縮短時(shí)間，具體要看你上面的“過(guò)程”是否調(diào)用數(shù)據(jù)庫(kù)完成。如果調(diào)用了數(shù)據(jù)庫(kù)，可以考慮用存儲(chǔ)過(guò)程替代“過(guò)程”。另外看看“過(guò)程”里是否反復(fù)打開(kāi)和關(guān)閉了數(shù)據(jù)庫(kù)連接，如果是，這才是真正的耗時(shí)動(dòng)作。如果沒(méi)調(diào)用數(shù)據(jù)庫(kù)，可以考慮使用Parallel類(lèi)(.net4以后)里面的函數(shù)，使多個(gè)任務(wù)在多核CPU上并行運(yùn)行，縮短時(shí)間。

本文題目：vb.net多線程,VB多線程
分享URL：http://chinadenli.net/article40/hsgpeo.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供虛擬主機(jī)、網(wǎng)站改版、響應(yīng)式網(wǎng)站、品牌網(wǎng)站建設(shè)、關(guān)鍵詞優(yōu)化、ChatGPT

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請(qǐng)盡快告知，我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng)，如需處理請(qǐng)聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來(lái)源： 創(chuàng)新互聯(lián)