在vb點(diǎn)虐 中，多線(xiàn)程如何使用

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

在成都網(wǎng)站制作、成都做網(wǎng)站中從網(wǎng)站色彩、結(jié)構(gòu)布局、欄目設(shè)置、關(guān)鍵詞群組等細(xì)微處著手，突出企業(yè)的產(chǎn)品/服務(wù)/品牌，幫助企業(yè)鎖定精準(zhǔn)用戶(hù)，提高在線(xiàn)咨詢(xún)和轉(zhuǎn)化，使成都網(wǎng)站營(yíng)銷(xiāo)成為有效果、有回報(bào)的無(wú)錫營(yíng)銷(xiāo)推廣。創(chuàng)新互聯(lián)公司專(zhuān)業(yè)成都網(wǎng)站建設(shè)10多年了，客戶(hù)滿(mǎn)意度97.8%，歡迎成都創(chuàng)新互聯(lián)客戶(hù)聯(lián)系。

vb點(diǎn)虐 里如何設(shè)置多線(xiàn)程?

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

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

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

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

調(diào)用如下：

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

mythread.Start()

***********

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

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

Vb點(diǎn)虐 多個(gè)線(xiàn)程執(zhí)行順序的問(wèn)題

多個(gè)線(xiàn)程執(zhí)行的時(shí)候，是按CPU時(shí)鐘輪番執(zhí)行的，你可以在兩個(gè)SUB中增加一條輸出到即時(shí)窗口：debug.print test_time

看不出你的test1和test2做什么用的？

VB點(diǎn)虐 如何設(shè)計(jì)多線(xiàn)程運(yùn)行

Sub Main()

Dim thr As Thread

For Pi As Integer=0 To 4 //啟用5線(xiàn)程

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)多線(xiàn)程進(jìn)程

Application.DoEvents

Next

End Sub

本文名稱(chēng)：vb點(diǎn)虐 多線(xiàn)程排程 vbnet timer多線(xiàn)程
當(dāng)前鏈接：http://chinadenli.net/article36/ddeicpg.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站設(shè)計(jì)、網(wǎng)頁(yè)設(shè)計(jì)公司、標(biāo)簽優(yōu)化、自適應(yīng)網(wǎng)站、面包屑導(dǎo)航、網(wǎng)站排名

廣告

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