Innanzi tutto in VB.NET non si parla di On Error (refuso di Visual Basic 6.0) ma, più correttamente, di Try/Catch/Finally e nel Catch chiami la tua routine.