Cita: El campo NUMREGISTRO es Numerico de tipo Entero Largo
Si es así debes usar el tipo de datos numerico para hacer la insercion, pruebalo de ésta forma:
Cita: locomando.Parameters.Add(New OleDbParameter("@NUMREGISTRO", OleDbType.Numeric))
Por cierto.. si estas usando Access no le veo sentido que tengas un manejador de errores para sql Server...(SqlException

)
podría quedar simplemente así:
Cita: ....
....
Catch ex As OleDbException
MsgBox("Se han producido los siguientes errores:" & vbCrLf & ex.Message, MsgBoxStyle.Critical, "Error")
Salu2