Visual Basic - Acerca de SQL

Hola, necesitaría ayuda acerca de cómo mostrar el campo específico que da error al intentar grabar una serie de registros en una tabla con campos "requeridos".
Utilizo Visual Basic un DataControl ADO y procuro utilizar consultas SQL para todas las funciones de manejo de la base de datos mediante el ADO.
Gracias de antemano por vuestra ayuda.

dim rs as adodb.recordset
set rs =adodc1.recordset
on error resume next
rs.addnew
dim snombrecampo as string
snombrecampo = "campo1"
rs!campo1=txtcampo1
if err <> 0 then
msgbox "este es un campo requerido: " & snombrecampo
err.clear
exit sub
end if

snombrecampo = campo2
rs!campo2 = txtcampo2
if err <> 0 then
msgbox "este es un campo requerido: " & snombrecampo
err.clear
exit sub

snombrecampo = campo3
rs!campo3 = Null
if err <> 0 then
msgbox "este es un campo requerido: " & snombrecampo
err.clear
exit sub

end if

rs.update