Class CConstructorTest
    'The New() function is called when we declare the variable, eg:
    'Dim SomeVariable As New CConstructorTest("This Constructor stuff is great!")
    'if we want to provide a method that doesn't require the passing of a string we
    'must use overloads, which are in another code example :)
    Public Sub New(ByVal szDisplayThisString As String)
        MsgBox("Constructor Called: " & szDisplayThisString, MsgBoxStyle.Exclamation, "Constructor Test")
    End Sub

    'this function is called when the variable is destroyed, or goes out-of-scope...
    Overloads Sub Finalize(ByVal bSaveData As Boolean)
        If bSaveData Then
            MsgBox("Someone wanted us to save the data before terminating...")
        End If
    End Sub
End Class