Imports System.Threading Imports System.Collections public class Test public Shared Sub Main Dim S1 As New Stack() Dim SyncS1 As Stack = Stack.Synchronized(S1)
Console.WriteLine("SyncS1: " & SyncS1.IsSynchronized.ToString())
Console.WriteLine("S1: " & S1.IsSynchronized.ToString()) End Sub End class