VB.NET异步调用代码详解

VB.NET是一个功能比较强大的编程语言，主要就是面向对象，而且其特有的性质还能对移动设备进行一些操作。那么今天我们将会了解到的则是关于VB.NET异步调用的一些实际代码编写方式，希望对大家有所帮助。

VB.NET异步调用代码示例：

 
 
private delegate Sub (()sub  
(or Function )()function) dele_1      
private dele_2 as dele_1     
private iasyync_test as IAsyncResult     
在form_load里面     
Private Sub Form1_Load()Sub   
Form1_Load(ByVal sender As   
System.Object, ByVal e As   
System.EventArgs) Handles   
MyBase.Load     
dele_2 = New dele_1(AddressOf   
test1) 'test1 是你想要异步调用的方法     
iasync_test=dele_2.begininvoke  
(nothing,nothing) '开始异步调用     
End Sub   

如果想知道VB.NET异步调用是否完成，加个button。

 
 
Private Sub Button2_Click()Sub 
Button2_Click(ByVal sender As 
System.Object, ByVal e As 
System.EventArgs) Handles 
Button2.Click  
If iasync.IsCompleted = 
True Then '已经完成调用  
dele_2.endinvoke(iasync)  
Else '未完成  
MessageBox.Show("not finished!")  
End If   
End Sub 

另外你也可以自己写个回掉函数，在VB.NET异步调用完成的时候进行别的操作。

 
 
Private Sub Form1_Load()Sub Form1_
Load(ByVal sender As System.Object, 
ByVal e As System.EventArgs) 
Handles MyBase.Load  
dele_2 = New dele_1(AddressOf test1) 
'test1 是你想要异步调用的方法  
dim ab as asynccallback  
ab=new asynccallback(address of
 back_test) 'back_test是要进行回掉的函数  
iasync_test=dele_2.begininvoke
(ab,nothing) '开始异步调用  
End Sub  
private Sub back_test()sub back_test()  
'想进行的操作。  
dele_2.endinvoke(iasync_test)  
end sub 

VB.NET异步调用的相关代码编写方法就为大家介绍到这里。