Visual Basic - Atrapar errores de SQL Server en Visual Basic

Hola!

Quiero saber como atrapar los errores de SQL Server (7.0) en Visual Basic. Concretamente si agrego un registro con clave repetida y uso el método Execute para un SP (que agrega un registro) , cuál sería la forma de captar el número de error del SQL Server y manejarlo?
Muchas gracias y saludos

el numero de error que manejarias en este caso seria el de visual basic.
y los errores se manejan mediante la instruccion

on error goto x

por ejemplo:

sub comando1_click
on error goto x
xxxxxxxxxxxx
xxxxxxxxxxxx

exit sub
x:
msgbox "Mi error fue este: " err.description
end sub

jder k listo, pero komo se resuelbe el porblema?