msgbox si chiffre pair entré dans textbox

bonsoir,
je cherche une solution pour ne pouvoir insérer dans un textbox qu'un chiffre pair,
me basant sur ce code

If Not IsNumeric(TextBox1.Text) Then
MsgBox "Seules les valeurs numériques sont acceptables."

j'ai essayé maintes et maintes solutions (estpair, ESTPAIR, iseven,ispeer,...) sans aucun résultat.
Mes recherches sur le net n'ayant rien donné, je me tourne encore une fois vers vous

merci

cordialement

Thierry