piccolo quesito in una combo

[BOYROMA1]

ho una combo che carico allapertura di un form attraverso un timer

al click della combo ho inserito il seguente codice

If Combo1.Text <> "" Then
Modifica = 1
If Data1.Recordset.EOF <> True Or Data1.Recordset.BOF <> True Then
Data1.Recordset.MoveFirst
Do While Not Data1.Recordset.EOF
If Combo1.Text = (Data1.Recordset("COGN DENOM SOC 1")) Then

Exit Do
End If
Data1.Recordset.MoveNext
Loop

End If
End If



il problema e' che se inserisco 2 nomi uguali se clicco sul secondo mi trova sempre il primo potreste aiutarmi per favore grazie in anticipo