DLL: inviare errori al client..

[Gigi84]

Ciao a tutti!!

Allora, veniamo al sodo:
sto facendo un piccolo componente DLL ActiveX, l'applicazione client che lo usa ad un certo punto deve chiamare il metodo Leggi(dir) di questo componente;
dir è una directory, se non esiste vorrei che venisse generato un errore all'applicazione che sta utilizzando il componente, ho fatto così:

Public Sub Leggi(PathCorso As String)
If (Not (Dir(PathCorso) = "")) Then 'c'è
    'TODO:Leggo..
Else
    On Error GoTo 0
    Err.Raise 1000 + vbObjectError, "Stile", "La directory del corso non è stata trovata."
End If
End Sub

disabilito la gestione degli errori prima di generarlo, eppure quando l'esecuzione è su err.raise mi si genera un errore di run-time nella DLL.. non nell'applicazione che la usa..

dov'è che sbaglio(ho guardato anche sullMSDN!!)?????????