Singleton Pattern VB.NET using Static Variable

Introduction

I have seen many implementations of the Singleton pattern. This one seems to be the most elegant for VB.NET and is as safe as simple.

Theory

Static Local Variables in VB.NET

In VB, a local variable marked as static, apart from usual local variable, continues to exist and retains its most recent value. Moreover, it is initialized only once and this operation is thread safe.

What it simply means is that while the first time property is accessed, the variable is defined and initialized with a value given. Every next call initialization and declaration is ignored and the variable is used as shared/static for this class and continues to exist for a lifetime of the class.

Singleton Pattern Implementation

Public Class Singleton

    Private Sub New()

    End Sub

    Public Shared ReadOnly Property GetInstance As Singleton
        Get
            Static Instance As Singleton = New Singleton
            Return Instance
        End Get
    End Property

End Class