Necesitas realizar la validación antes de mandar llamar el ExecuteNonQuery(). Por otro lado donde tienes el SELECT COUNT(*) necesitas hacer algo similar a lo siguiente:
Código vb:
Ver originalDim nRegistros AS INTEGER = Comandos.ExecuteScalar()
IF nRegistros > 0 THEN
'-- Realizas la inserción
ELSE
MsgBox("No existen datos.")
END IF