VB.NET Socket通信 回調(diào)函數(shù)里的數(shù)據(jù)無法顯示到界面控件內(nèi)

a+=1; 這條指令必須在dosomething()方法執(zhí)行完畢返回結(jié)果后才可以執(zhí)行，否則就亂了套

創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù)，包含不限于成都網(wǎng)站建設(shè)、網(wǎng)站建設(shè)、?？h網(wǎng)絡(luò)推廣、微信小程序開發(fā)、浚縣網(wǎng)絡(luò)營銷、?？h企業(yè)策劃、?？h品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運(yùn)營等，從售前售中售后，我們都將竭誠為您服務(wù)，您的肯定，是我們最大的嘉獎(jiǎng)；創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供?？h建站搭建服務(wù)，24小時(shí)服務(wù)熱線：028-86922220，官方網(wǎng)址：www.cdcxhl.com

異步：異步概念和同步相對，當(dāng)一個(gè)異步過程調(diào)用發(fā)出后，調(diào)用者不能立刻得到結(jié)果。實(shí)際處理這個(gè)調(diào)用的部件在完成后，通過狀態(tài)、通知和回調(diào)來通知調(diào)用者（百度上抄的）。理解了同步概念后異步也就不難理解了，以javascript的ajax為例

ajax(arg1,arg2,function(){

//回調(diào)函數(shù)

a=3；

});

a=4；

這個(gè)代碼段執(zhí)行完成后一般情況會把a(bǔ)賦值為3而不是4，因?yàn)樵赼jax方法調(diào)用后，a=4;這條語句并沒有等待ajax()返回結(jié)果就執(zhí)行了，也就是在ajax()執(zhí)行完成調(diào)用回調(diào)函數(shù)之前，a=4；已經(jīng)執(zhí)行了，回調(diào)函數(shù)再把a(bǔ)賦值為3使之成為最后結(jié)果，為此在ajax調(diào)用中我們經(jīng)常會使用回調(diào)函數(shù)，其實(shí)在很多異步處理中我們都會使用到回調(diào)函數(shù)。

阻塞

阻塞操作是指，在執(zhí)行設(shè)備操作時(shí)，若不能獲得資源，則進(jìn)程掛起直到滿足可操作的條件再進(jìn)行操作。

vb.net 如何用進(jìn)度條顯示數(shù)據(jù)查詢進(jìn)度?

有不是多線程的，.NET有一個(gè)異步控件來完成這個(gè)事情，BackgroundWorker。

多線程其實(shí)比你想象的簡單，你計(jì)劃操作步驟，打比方說我們處理一個(gè)文件，用進(jìn)度條來顯示進(jìn)度。我們可以定義解壓他進(jìn)度為5%，解密文件后哦進(jìn)度完成20%，讀取數(shù)據(jù)后進(jìn)度完成30%，重新整理插入數(shù)據(jù)后進(jìn)度完成60%，再加密，進(jìn)度為80%，再壓縮進(jìn)度為90%，再發(fā)送進(jìn)度為95%，刪除歷史記錄結(jié)束動作進(jìn)度為100%。這種事就要多線程去完成，調(diào)用控件你就需要委托或者回調(diào)控件。

進(jìn)度條給他賦值就好了，程序運(yùn)行后你會發(fā)現(xiàn)進(jìn)度條在動。

這是現(xiàn)在90%程序進(jìn)度條原理。

關(guān)于vb.net中實(shí)現(xiàn)委托的一個(gè)問題

把UI對象當(dāng)做參數(shù)傳入 比如 Sub a(Form As Form1)

之后再用Form.Invoke(你的委托,參數(shù)) 就可以即時(shí)修改Form中的內(nèi)容了

vb.net 中的異步委托機(jī)制，最好有相關(guān)的詳細(xì)資料講解，我是新手

所謂的委托（Delegate）實(shí)際上就是和C/C++里面的函數(shù)指針差不多，只是增強(qiáng)了類型檢查等其它健壯性方面的內(nèi)容。異步調(diào)用的回調(diào)函數(shù)有格式要求，所謂格式要求就是參數(shù)數(shù)量及類型順序的要求，具體是什么樣的你要看文檔了。一般.NET Framework里面都是AsyncCallBack。

所謂異步編程，就是說你要求做某樣事情，但是在完成這件事之前，我能接著做下一件事，而當(dāng)這件事情完成之后，能夠有一種機(jī)制通知我完成了。相反，在完成之前一直等待，直到完成了才能進(jìn)行下一步操作，叫做同步。一般來說，我們平常寫的程序都是“同步”，或者成為“順序執(zhí)行”更加貼切，而“異步”則可以說是“亂序執(zhí)行”的。

可以看到，同步的代碼非常好寫，因?yàn)槲覀兛梢灶A(yù)測執(zhí)行的順序和情況。而異步就不是很好寫了，因?yàn)闊o法得知完成的時(shí)候我正在做什么、做到什么程度。過去寫這些代碼是比較麻煩的，實(shí)現(xiàn)的辦法就是自己建立一個(gè)處理異步事物的線程，然后在這個(gè)線程和主線程之間建立聯(lián)系。而現(xiàn)在這個(gè)過程大部分已經(jīng)被系統(tǒng)封裝起來了，你只要調(diào)用BeginXXX，系統(tǒng)就會為你自動建立一個(gè)新的線程處理這個(gè)事情，當(dāng)前線程不阻塞，可以馬上進(jìn)行下一項(xiàng)操作，于是就實(shí)現(xiàn)了“異步”了。但是從前面我講道的你就應(yīng)該知道，開始異步操作并沒有完事，還需要能夠得知操作完成，并能夠進(jìn)行相應(yīng)的處理。于是你在調(diào)用BeginXXX的時(shí)候就需要傳遞一個(gè)回調(diào)函數(shù)，在.NET里是以委托的方式傳遞的?；卣{(diào)函數(shù)的意思就是“回過頭來調(diào)用你”，或者說A調(diào)用B并且傳遞函數(shù)C的地址，于是B在指定的情況下調(diào)用A指定的函數(shù)C?，F(xiàn)在就應(yīng)該明白這個(gè)回調(diào)函數(shù)在BeginXXX中的作用就是，當(dāng)你指定的事情做完之后將會調(diào)用這個(gè)回調(diào)函數(shù)。

在這個(gè)回調(diào)函數(shù)里面，我們就可以進(jìn)行一些后續(xù)的工作，例如接著進(jìn)行性質(zhì)相同的工作，或者相應(yīng)的處理。在這里，我們也許向知道剛才那件事情執(zhí)行的情況和結(jié)果，這個(gè)時(shí)候我們就可以通過EndXXX來獲得這些東西。說到這里，結(jié)合上面說到的AsyncCallBack以及隨便哪個(gè)BeginXXX，我們可能會對下列兩個(gè)東西感到困惑：

IAsyncResult

stateObject

首先說IAsyncResult，這個(gè)是一個(gè)接口，你在回調(diào)函數(shù)中通過參數(shù)獲得的對象具體是什么類型的一般我們不需要關(guān)心，我們只需要依照這個(gè)接口的定義進(jìn)行訪問就可以了。簡單點(diǎn)說，這個(gè)接口規(guī)定了順利完成異步操作所需信息的最小集合。一般來說，我們需要通過這個(gè)參數(shù)（ar）來識別異步操作。比如說，你在一瞬間發(fā)起一百個(gè)“從不同的網(wǎng)絡(luò)連接獲取數(shù)據(jù)”的異步請求，當(dāng)某一個(gè)請求被完成的時(shí)候，如何判斷是那個(gè)請求被完成呢？就是依靠回調(diào)函數(shù)的參數(shù)ar。實(shí)際上你一般是不需要參與判斷的，你只要將這個(gè)ar傳遞給EndXXX就可以了，EndXXX會根據(jù)這個(gè)ar自行判斷的。需要注意的是，這個(gè)ar就是你調(diào)用BeginXXX的時(shí)候的返回值，可以說是一個(gè)存根，如果你需要在完成操作前終止他，也可以通過將這個(gè)存根傳遞給EndXXX，EndXXX就會根據(jù)情況終止操作。（IAsyncResult里面的IsCompleted提供了是否已經(jīng)完成的判斷，EndXXX就是根據(jù)這個(gè)值決定是否有必要終止。當(dāng)然，你不需要關(guān)心他。）

接下來我們看看stateObject，這個(gè)東西被稱為狀態(tài)對象。于是大家就可能奇怪了：那個(gè)ar不也是狀態(tài)嗎？實(shí)際上stateObject是一個(gè)留給用戶使用的東西，BeginXXX/EndXXX根本就不使用。這個(gè)stateObject會被裝到ar的AsyncState里面，也就是說這個(gè)stateObject可以隨時(shí)通過訪問存根（BeginXXX的返回值）或者回調(diào)函數(shù)里的ar得到，你完全沒必要額外的保存到什么地方，更不需要費(fèi)神的去考慮如何和你的某個(gè)異步操作對應(yīng)起來。說了半天，這個(gè)東西有什么用呢？你想怎么用就怎么用唄，發(fā)揮一下你的想象力。比如說，你可以保存這是第幾次操作，或者在多個(gè)異步操作之間要同步的時(shí)候可以作為信號旗，再或者直接是操作這個(gè)異步操作的對象（x.BeginXXX的時(shí)候?qū)傳遞到stateObject參數(shù)上）。

第一種用法有點(diǎn)多余，第二種用法有點(diǎn)復(fù)雜，第三種我用得最多。因?yàn)槟愫芸赡茉趨f(xié)一個(gè)服務(wù)端，而服務(wù)段必須能夠響應(yīng)多個(gè)客戶端，這決定了必須用異步。同時(shí)，對于多個(gè)客戶端必然有多個(gè)對象，例如網(wǎng)絡(luò)連接的時(shí)候可能是Socket。而實(shí)際上處理的方法或者協(xié)議是和具體哪個(gè)客戶端沒有關(guān)聯(lián)的，因此我們只需要一套處理程序就夠了。這個(gè)時(shí)候第三種用法就很有用處，我們完全可以把代碼寫成這樣：

Sub DataReceived(ByVal ar As IAsyncResult)

ar.AsyncState.EndReceive(ar)

ar.AsyncState.BeginReceive(... , ar.AsyncState)

End Sub

這樣就不需要額外的數(shù)據(jù)結(jié)構(gòu)去記錄有那些正在活動的對象了。

vb.net 中在模塊（module）里如何實(shí)現(xiàn)委托

委托三個(gè)步驟

1、聲明委托 用Delegate 聲明一個(gè)委托 類型 參數(shù)要和 被委托的方法一樣 例如 Delegate Function a(byval x as string) as string

2、實(shí)例化委托 dim t as new a(AddressOf Function Name)

3.通過 t(參數(shù)) 或者 t.Invoke(參數(shù)調(diào)用委托)

示例：

Module module1

Delegate Function a(ByVal x As Integer, ByVal y As Integer) As Integer '聲明委托類型 委托可以使一個(gè)對象調(diào)用另一個(gè)對象的方法

Function sum(ByVal x As Integer, ByVal y As Integer) As Integer

Return (x + y)

End Function

Sub main()

Dim d As New a(AddressOf sum) '實(shí)例化委托

Dim s = 0

s = d.Invoke(1, 2) '執(zhí)行委托

Console.WriteLine(s.ToString())

s = d(1, 2) '執(zhí)行委托

Console.WriteLine(s.ToString())

MsgBox("")

End Sub

End Module

vb的回調(diào)函數(shù)轉(zhuǎn)為vb.NET

先聲明一個(gè)委托：

Public Delegate Function EnumChildProc(hwnd As Integer, iParam As Integer) As Integer

然后才能使用回調(diào)函數(shù)，回調(diào)函數(shù)的參數(shù)要和委托完全一致。

然后那個(gè) API 函數(shù)需要這樣聲明：

Declare Function EnumChildWindows Lib "user32" (hWndParent As Integer, lpEnumFunc As EnumChildProc, lParam As Integer) As Integer