Code:
x = 0
        Do Until x = users.Length
            'MsgBox("" & i & " " & x & " " & uid & "")

            If users(x) = uid Then
                spam2 = (spam2.Substring(spam2.IndexOf(inner)))
                MsgBox("MULTIPLE PERSON DETECTED")

                Exit Do
            Else
                If users(x) = users.Length Then
                    Exit Do
                End If

            End If
            x = x + 1

        Loop
using that do statement, im searching through an array, is seems to work because it picks up about the first 2 doubles, anyone know what i can do to fix this? or if theres a a problem with the syntax?