學習VB.NET時，經常會遇到VB.NET線程同步問題，這里將介紹VB.NET線程同步問題的解決方法，在這里拿出來和大家分享一下。

VB.NET線程同步

在VB.NET線程同步方面，VB.NET提供了幾個方法。在上面的平方例子中，你要與執行計算的VB.NET線程同步，以便等待它執行完并且得到結果。另一個例子是，如果你在其它線程中排序一個數組，那么在使用該數組前，你必須等待該處理完成。為了進行這些同步，VB.NET提供了SyncLock聲明和 Thread.Join方法。

SyncLock可得到一個對象引用的***鎖，只要將該對象傳送給SyncLock就行了。通過得到這個***鎖，你可以確保多個線程不會訪問共享的數據或者在多個線程上執行的代碼。要得到一個鎖，可使用一個較為便利的對象--與每個類關聯的System.Type對象。System.Type對象可通過使用GetType方法得到：

Public Sub CalcSquare()  
SyncLock GetType(SquareClass)  
Square = Value * Value  
End SyncLock  
End Sub 

另一個是Thread.Join方法，它可讓你等待一個特定的時間，直到一個線程完成。如果該線程在你指定的時間前完成了，Thread.Join將返回 True，否則它返回False。在平方的例子中，如果你不想使用觸發事件的方法，你可以調用Thread.Join的方法來決定計算是否完成了。代碼如下所示：

Private Sub Button1_Click(ByVal sender As System.Object, 
_ByVal e As System.EventArgs) Handles Button1.Click  
Dim oSquare As New SquareClass()  
t = New Thread(AddressOf oSquare.CalcSquare)  
oSquare.Value = 30 
t.Start()  
If t.Join(500) Then  
MsgBox(oSquare.Square)  
End If  
End Sub 

對于這種方法，要注意的是處理事件的過程，在這個例子中的是SquareEventHandler，將運行在產生該事件的線程中。它并不是運行在表格執行的線程中。

【編輯推薦】

1. 詳細講述VB.NET開發控件
2. VB.NET Control類的屬性和方法
3. 解析VB.NET如何連接數據庫
4. VB.NET應用程序中多線程的應用實例
5. 淺析VB.NET程序學習經驗