metti uno spazio tra On e Error:Originariamente inviato da tito
Inserendo cio' che hai detto ricevo:
ERRORE DI SINTASSI (?!)
---------------------------------------------
Private Sub Command2_Click()
CommonDialog1.CancelError = True
OnError GoTo ANNULLA
[...]
ANNULLA:
OnError GoTo 0
End Sub
------------------------------
On Error GoTo ...
Boolean