VB.NET 1.1 - efficient way to search in an array List of objects

--------------------------------------------------------------------------------------------------------------------------------
Vb.net 1.1 -Searching an object item inside an array list of objects
--------------------------------------------------------------------------------------------------------------------------------
Is there an efficient and fast way to search an object item inside an array list of objects in .net 1.1? In details&..
I have a class like (See Code Below) -
Public Class MyClass1
    Private MyID As String = ""
    Private MyName As String = ""
    Private MyAddress As String = ""
 
    Public Property ID() As String
        Get
            Return MyID
        End Get
        Set(ByVal Value As String)
            MyID = Value
        End Set
    End Property
 
    Public Property Name() As String
        Get
            Return MyName
        End Get
        Set(ByVal Value As String)
            MyName = Value
        End Set
    End Property
 
    Public Property Address() As String
        Get
            Return MyAddress
        End Get
        Set(ByVal Value As String)
            MyAddress = Value
        End Set
    End Property
End Class
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
And I want to search by Name say 'MyFirstName' from an array list of objects of type MYClass1 as -
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Dim arrlMyClass1 As ArrayList		'a large array list of objects of type MyClass1
 Dim objMyObject As New MyClass1
 Dim MyID As String = ""
 
 For Each objMyObject In arrlMyClass1
     If Trim(LCase("MyFirstName")) = Trim(LCase(objMyObject.Name)) Then
        MyID = objMyObject.ID
        Exit For
     End If
 Next
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
I am looking for an efficient search method to replace the above to search an object by item Name - say 'MyFirstname'. The For each loop is taking a lot of time if the array list is large.

Open in new window

LVL 1
GurunathansAsked:
Who is Participating?
 
MaxOvrdrv2Connect With a Mentor Commented:
because you declared it as a class, there is no efficient way of doing that...

however, you could always define a function in your class that does it for you.. something like this:
Public Class MyClass1
Public Function Find(ByVal Lst AS ArrayList, ByVal FN AS String) As String
Dim Itm AS ListItem
Dim retval as String
For Each Itm In arrlMyClass1
If Trim(LCase(FN)) = Trim(LCase(Itm.Name)) Then
  retval="Person Found!"
End If
Next
if retval="" then
  return "Not Found!"
else
  return retval
end if
End function

Open in new window

0
All Courses

From novice to tech pro — start learning today.