Поиск в List(Of T) с помощью BinarySearch - Visual Basic .NET
Формулировка задачи:
Доброго времени суток господа.
С прошедшими Вас праздниками ….
Создал типизированный список объектов List(Of Operator)
Как мне осуществить поиск элемента в List с помощью BinarySearch, ругается на строку
Dim qw As Integer = Operators.BinarySearch("Иванов")
«Значение типа «String» невозможно преобразовать в «Operator»».
Спасибо!
Листинг программы
- Public Class Operator
- Public Property FIO As String
- Public Property TabRoom As String
- Public Property Phone As String
- Public Property Visa As String
- End Class
Листинг программы
- Public Sub loadOperator()
- Dim Operators As New List(Of Operator)
- Dim Massiv() As String = IO.File.ReadAllLines(System.Windows.Forms.Application.StartupPath & "\List\Operator.txt", System.Text.Encoding.Default)
- For i = 0 To UBound(Massiv)
- Dim temp() As String = Split(Massiv(i), "|")
- Dim OperTr As New Operator
- Oper.FIO = temp(0)
- Oper.Phone = temp(1)
- Oper.TabRoom = temp(2)
- Oper.Visa = temp(3)
- Operators.Add(Oper)
- Next
- Operators.Sort()
- Dim qw As Integer = Operators.BinarySearch(???)
Решение задачи: «Поиск в List(Of T) с помощью BinarySearch»
textual
Листинг программы
- Public Class [Operator]
- '...
- '...
- Public Class comparerByFIO
- Implements System.Collections.Generic.IComparer(Of [Operator])
- Public Function Compare(x As [Operator], y As [Operator]) As Integer Implements System.Collections.Generic.IComparer(Of [Operator]).Compare
- If (x Is Nothing) And (y Is Nothing) Then Return 0
- If (x Is Nothing) Then Return 1
- If (y Is Nothing) Then Return -1
- Return String.Compare(x.FIO, y.FIO, True)
- End Function
- End Class
- End Class
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д