diff options
Diffstat (limited to 'wizards/source/access2base/Property.xba')
-rw-r--r-- | wizards/source/access2base/Property.xba | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/wizards/source/access2base/Property.xba b/wizards/source/access2base/Property.xba index 76df18094982..659c4215c85a 100644 --- a/wizards/source/access2base/Property.xba +++ b/wizards/source/access2base/Property.xba @@ -29,7 +29,15 @@ Private Sub Class_Initialize() End Sub ' Constructor REM ----------------------------------------------------------------------------------------------------------------------- -'Private Sub Class_Terminate() +Private Sub Class_Terminate() + On Local Error Resume Next + Call Class_Initialize() +End Sub ' Destructor + +REM ----------------------------------------------------------------------------------------------------------------------- +Public Sub Dispose() + Call Class_Terminate() +End Sub ' Explicit destructor REM ----------------------------------------------------------------------------------------------------------------------- REM --- CLASS GET/LET/SET PROPERTIES --- |