usa un try se hai vb.net:

codice:
try
'qui il codice che potrebbe dare errore
catch e as exception
'qui il codice che deve eseguire se c'è errore
end try
se hai vb6:

codice:
on error goto 1
'qui il codice che potrebbe dare errore
1:
if err.number == [tuo numero errore]
'qui il codice che deve eseguire se c'è errore