Petit problème avec RegEx

Bonjour,

j'ai le code suivant pour vérifier les liens sur mon programme
mais j'ai une erreur

Code:

Type 'RegExp' non defini

Code de la fonction
Code:

1 2 3 4 5 6 7 8 Function ValidationURL(ByVal url) Dim modele modele = New RegExp modele.pattern = "^(http://|https://){0,1}[A-Za-z0-9][A-Za-z0-9\-\.]+[A-Za-z0-9]\.[A-Za-z]{2,}[\43-\176]*$" modele.global = True ValidationURL = modele.test(url) End Function
Savez vous comme résoudre le problème s'il vous plait ?

Merci
Cordialement,