Разное

Нужно найти элемент в списке. Если существует - то вернуть false; если нет то вернуть true
Вот что имею - но работает не правильно. Где оплошность?

Private Function Valida() As Boolean         Dim status As Boolean = False         Dim LastStatus As Boolean = True         Dim i As Integer = 0         For Each wItem In mConnessioneCollect             If (wItem.Trim() <> Name.Text.Trim() And LastStatus = True) Then                 status = True             Else                 LastStatus = False             End If             i = i + 1         Next         If i = 0 Then             status = True         Else             status = False         End If         Return status     End Function

Я не знаю что это за язык но

Private Function Valida() As Boolean         Dim status As Boolean = True         For Each wItem In mConnessioneCollect             If (wItem.Trim() == Name.Text.Trim())                 status = False             End If          Next         Return status     End Function

И откуда береться Name.Text? Зачем нужна переменная i?


в вашем алгоритме ошибка, там увеличиваться i+ всегда, по идеи вы написали плохой алгоритм на узнавание еслть ли хоть 1 элемент.

>Я не знаю что это за язык
Basic )))

А в таком случае не надо ли порвать цикл, если значение уже найдено?
не status = False, а сразу return False?

Private Function Valida() As Boolean         For Each wItem In mConnessioneCollect             If (wItem.Trim() == Name.Text.Trim())                 return False;             End If          Next         Return True;     End Function

хей!)

и да лучше использовать не Name.Text.Trim(), а сделать переменную результат этой функции, чтоб каждый раз ее не вызывать