Empêcher un contenu identique dans des textbox

[alias_2003]

Bonjour à tous,
J'ai une usf avec 4 textbox, j'aimerais qu'il ne soit pas possible de mettre 2 fois le même nom... Voici mon code qui fonctionne, mais la msgbox apparait aussi souvent que le contenu est identique... J'aimerais qu'elle n'apparaisse qu'une fois...

    If TextBox1 <> TextBox2 <> TextBox3 <> TextBox4 Then
    MsgBox "Merci de différencier les noms", vbInformation, "Attention !!"
  Unload Me
       End If

Merci beaucoup
Bonne journée

 

[Fred0o]

Re : Empêcher un contenu identique dans des textbox

jour alias_2003,

Tu peux essayer ce code :

    If TextBox1 = TextBox2 Or TextBox1 = TextBox3 Or TextBox1 = TextBox4 Or TextBox2 = TextBox3 Or _
        TextBox2 = TextBox4 Or TextBox3 = TextBox4 Then
        MsgBox "Merci de différencier les noms", vbInformation, "Attention !!"
    End If

A+

 

[alias_2003]

Re : Empêcher un contenu identique dans des textbox

Bonjour Fred0o,
Merci beaucoup ! C'est parfait !
Bonne journée,
Amicalement