Localiza duplicatas

[RobinhoVB]

Ola pessoal

Venho pedir uma ajuda pra vocês

Seguinte

Na minha empresa inventaram uma estatistisca de 12 produtos mais e menos vendidos

num sistema de votacao entre os funcionarios. Tipo produto tal Ruim recebe numero 12 e assim por diante ate o melhor que recebe numero 1.

Eu criei os campos em um BD. e no meu Form criei 12 TextBox com index "ARREY" acho que e isso, tipo TextProduto(0), TextProduto(1),.... e assim por diante ate TextProduto(11), so esses campos serao digitados por funcionarios. Sabem como e

podera um ou outro digitar numeros iguais, dai que entra minha duvida

COMO EU POSSO CRITICAR SE FOREM DIGITADOS NUMEROS IGUAIS TIPO O CARA POE NUMERO 7 NO PROMEIRO PRODUTO E 7

NO OITAVO PRODUTO... ?

Conto com vocês.

Grato :) :wacko:

[kuroi]

faca um for dentro do outro q va comparando um com o outro.

mais ou menos assim acho:

Dim i As Integer, j As Integer
    
    i = 0
    For i = Text1.LBound To Text1.UBound
        For j = i + 1 To Text1.UBound
            If i <> j Then
                If Text1(i).Text = Text1(j).Text Then
                    MsgBox "O texto nº " & i + 1 & " é igual ao nº " & j + 1
                End If
            End If
        Next
    Next[/code]