Visual Basic

Copy Code

        Public Shared ReadOnly Property [Default]() As MySettings
            Get
 
 #If _MyType = "WindowsForms" Then
               If Not addedHandler Then
                    SyncLock addedHandlerLockObject
                        If Not addedHandler Then
                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
                            addedHandler = True
                        End If
                    End SyncLock
                End If
 #End If
                Return defaultInstance
            End Get
        End Property