Visual Basic - Terminar la ejecución de Dll con END

Hola Amigos,

Estoy trabajando con visual basic 6, y términe de crear una DLL para trabajar con asp, esta Dll se desactiva durante los proximo 6 meses pero un private sub no me deja ocupar el "END" ¿con que puedo términar la ejecución de un Dll?

Codigo
Private Sub Class_Initialize()
Dim depen As Dependencia
Set depen = New Dependencia
If depen.Dependencia Then
Call OpenDB
Else
MsgBox "Este Software se ha desactivado, contactese con su administrador.", vbCritical
END ' aca se produce el error
End If
End Sub

Un dll no puede finalizarse, solo un exe

las DLL de VB son llamadas Activex DLLs o COM DLLs (interfaces)

para terminar la DLL tienes que destruir todas las referencias que puntan a la clase.
Set depen = Nothing
con eso destruyes una referencia y como era la unica, se destruira la clase (DLL)