建站
咨詢(xún)
售后
建站咨詢(xún)
新聞中心
VB6.0就是VB。NET嗎
VB.NET是微軟為了統(tǒng)一.NET而新開(kāi)發(fā)的語(yǔ)言，VB.NET沿用了VB6的部分語(yǔ)法，是VB 6.0的后繼版本，但是并不是VB6的升級(jí)版。
雨山網(wǎng)站制作公司哪家好，找成都創(chuàng)新互聯(lián)！從網(wǎng)頁(yè)設(shè)計(jì)、網(wǎng)站建設(shè)、微信開(kāi)發(fā)、APP開(kāi)發(fā)、成都響應(yīng)式網(wǎng)站建設(shè)公司等網(wǎng)站項(xiàng)目制作，到程序開(kāi)發(fā)，運(yùn)營(yíng)維護(hù)。成都創(chuàng)新互聯(lián)從2013年創(chuàng)立到現(xiàn)在10年的時(shí)間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來(lái)保證我們的工作的順利進(jìn)行。專(zhuān)注于網(wǎng)站建設(shè)就選成都創(chuàng)新互聯(lián)。
VB.NET除了在語(yǔ)法上還保留VB6.0原有的蹤影以外，二者幾乎在90％以上保持相似或相同。但在其他很多方面，VB.NET都和VB6.0截然不同。正是這些不同點(diǎn)，才使得VB.NET功能更強(qiáng)大，更有生命力，但同樣也為VB6.0程序員轉(zhuǎn)型為VB.NET程序員帶來(lái)了困難。因?yàn)閂B.NET提出了很多新的功能、概念和觀點(diǎn)，掌握VB.NET不僅要掌握語(yǔ)法，還需要理解并運(yùn)用這些新的功能、概念和觀點(diǎn)。當(dāng)然也需要掌握.Net框架，理解CLR（CommonLanguage Runtime，通用語(yǔ)言進(jìn)行時(shí)）。
總結(jié)下面幾個(gè)二者不同點(diǎn)：
VB.NET是完全面向?qū)ο蠛秃蟋F(xiàn)代化的語(yǔ)言(JAVA獨(dú)具的新概念)
VB.NET是自由線程語(yǔ)言
VB.NET的運(yùn)行速度比VB6要快
VB.NET從語(yǔ)法上來(lái)說(shuō)更加緊湊和具有規(guī)律性
VB.NET開(kāi)放了界面設(shè)計(jì)代碼
VB.NET可以更好地集成微軟的新產(chǎn)品和新技術(shù)
VB.NET擁有更加強(qiáng)大附屬組件
VB.NET擁有移動(dòng)開(kāi)發(fā)的能力
VB.NET封裝的類(lèi)功能強(qiáng)大，不需要額外使用API
VB.NET的開(kāi)發(fā)環(huán)境更加緊密與集成化，與同類(lèi)語(yǔ)言(如C#)連接更緊密
VB.NET目前還受到微軟的更新和支持
VB.NET必須運(yùn)行在.NET的虛擬機(jī)上
VB.NET要更加難學(xué)
VB.NET中的多線程和委托是什么關(guān)系? 能不能給我一個(gè)通俗易懂的范例,謝謝
委托，Delegate
就是讓你處于這個(gè)線程里時(shí)，委托另一個(gè)線程去執(zhí)行一些動(dòng)作
我簡(jiǎn)單舉一個(gè)寫(xiě)richtextbox的例子：
////////////////////////////////////////////
'創(chuàng)建一個(gè)名為 MySubDelegate 的委托。
Delegate Sub MySubDelegate(ByVal txt As String)
'寫(xiě)信息到富文本主窗口
Private Sub txtW(ByVal txt As String)
Dim msgd As New MySubDelegate(AddressOf Me.txtW1)
Dim arg(0) As Object
arg(0) = txt
Me.Invoke(msgd, arg)
End Sub
'委托指向
Private Sub txtW1(ByVal txt As String)
Me.RichTextBox1.AppendText(txt)
End Sub
/////////////////////
這樣，你在多線程應(yīng)用時(shí)，在其他線程里用txtW(str)來(lái)寫(xiě)richtextbox，就不會(huì)產(chǎn)生錯(cuò)誤了。不然，直接垮線程寫(xiě)richtextbox，可能會(huì)出現(xiàn)和UI線程的沖突。
VB中的多線程
定義：
Dim g_ReceiveThread As System.Threading.Thread
創(chuàng)建：
g_ReceiveThread = New System.Threading.Thread(AddressOf ReceiveProc)
開(kāi)始：
g_ReceiveThread.Start()
結(jié)束：
Dim waitStart As Long = My.Computer.Clock.TickCount + 1000 ‘超時(shí)
While (g_ReceiveThread.ThreadState System.Threading.ThreadState.Stopped)
If My.Computer.Clock.TickCount = waitStart Then
g_ReceiveThread.Abort()
End If
Application.DoEvents()
End While
VB.NET 簡(jiǎn)單多線程
多線程一般是不推薦用的，因?yàn)榫€程之間如果有共享資源的話會(huì)引起競(jìng)爭(zhēng)，需要加鎖處理；而且線程間沒(méi)有時(shí)序關(guān)系，所以你在調(diào)試中可能會(huì)出現(xiàn)異步處理結(jié)束順序與開(kāi)始處理順序不一致的情況（我在調(diào)試中已經(jīng)發(fā)現(xiàn)該問(wèn)題）。
針對(duì)你提出的這個(gè)問(wèn)題，采用了多線程處理，利用的是BackgroundWorker也就是異步處理控件進(jìn)行了處理。
代碼已經(jīng)經(jīng)過(guò)調(diào)試通過(guò)。歡迎交流，如有問(wèn)題，留下QQ或其他聯(lián)系方式。
代碼如下，并附程序截圖。
‘---------------------------------------------------
Imports?System.ComponentModel?'導(dǎo)入異步控件命名空間
Public?Class?Form1
Private?howmany?As?Integer?=?10
Private?AnalysisNumber(0?To?howmany?-?1)?As?BackgroundWorker
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
ListBox1.Items.Clear()
creatNewBackgroundWorker()
addHandle()
startWork()
End?Sub
Private?Sub?creatNewBackgroundWorker()
For?i?As?Integer?=?0?To?AnalysisNumber.Length?-?1
AnalysisNumber(i)?=?New?BackgroundWorker
Next
End?Sub
Private?Sub?addHandle()
For?i?As?Integer?=?0?To?AnalysisNumber.Length?-?1
AddHandler?AnalysisNumber(i).DoWork,?AddressOf?AnalysisNumber_DoWork
AddHandler?AnalysisNumber(i).RunWorkerCompleted,?AddressOf?AnalysisNumber_RunWorkerCompleted
Next
End?Sub
Private?Sub?startWork()
For?i?As?Integer?=?0?To?9
Dim?temp(0?To?9)?As?Integer
For?j?As?Integer?=?1?To?10
temp(j?-?1)?=?10?*?i?+?j
Next
AnalysisNumber(i).RunWorkerAsync(temp)
Next
End?Sub
Private?Sub?AnalysisNumber_DoWork(ByVal?sender?As?Object,?ByVal?e?As?System.ComponentModel.DoWorkEventArgs)
Dim?data?As?Integer()
data?=?CType(e.Argument,?Integer())
Dim?temp?As?Integer
For?i?As?Integer?=?0?To?data.Length?-?1
temp?=?data(i)
data(i)?=?temp?*?temp
Next
e.Result?=?data
End?Sub
Private?Sub?AnalysisNumber_RunWorkerCompleted(ByVal?sender?As?Object,?ByVal?e?As?System.ComponentModel.RunWorkerCompletedEventArgs)
Dim?data?As?Integer()
data?=?CType(e.Result,?Integer())
For?i?As?Integer?=?0?To?data.Length?-?1
ListBox1.Items.Add(data(i))
Next
End?Sub
End?Class
VB.NET 多線程運(yùn)行問(wèn)題
多線程是用于處理復(fù)雜項(xiàng)目的
打個(gè)比方
你的主程序線程A中有個(gè)循環(huán)，由于代碼是一行行走的，所以循環(huán)結(jié)束前下面的代碼無(wú)法運(yùn)行，而此時(shí)主界面的反應(yīng)就類(lèi)似卡死的樣子，你點(diǎn)擊按鈕也沒(méi)有反應(yīng)，因?yàn)橹骶€程在忙著循環(huán)呢，所以對(duì)按鈕的事件代碼要等待了，如果要避免這種情況，就要用到多線程，另開(kāi)一個(gè)新線程專(zhuān)門(mén)用來(lái)執(zhí)行循環(huán)代碼，主界面就不會(huì)卡死了，只要在循環(huán)結(jié)束后將結(jié)果傳回主線程調(diào)用就可以了，再?gòu)?fù)雜點(diǎn)要涉及到委托，控制了
按你的要求其實(shí)你的代碼用不到多線程，只要把sleep放到兩段代碼中間就可以了。
新線程結(jié)束用thread.abort()
文章名稱(chēng)：vb.net線程的概念,vbnet thread
轉(zhuǎn)載來(lái)源：http://fisionsoft.com.cn/article/hcpsoo.html
