搜索自定义数据类以获得结果

Question

我已经构建了一个自定义数据类来存储IP地址详细信息。

 Public Class IPAddressDataItem 

     Private _ID As Integer 
     Private _IP As String 
     Private _Name As String 

     Public Property ID() As Integer 
      Get 
       Return _ID 
      End Get 
      Set(ByVal value As Integer) 
       _ID = value 
      End Set 
     End Property 
     Public Property IP() As String 
      Get 
       Return _IP 
      End Get 
      Set(ByVal value As String) 
       _IP = value 
      End Set 
     End Property 
     Public Property Name() As String 
      Get 
       Return _Name 
      End Get 
      Set(ByVal value As String) 
       _Name = value 
      End Set 
     End Property\ 

     Public Sub New(ByVal id As Integer, ByVal ip As String, ByVal name As String) 
      _ID = id 
      _IP = ip 
      _Name = name 
     End Sub 

    End Class 

我想知道如何做的是搜索它的具体数据。

示例..我发送一个IP地址，它会将名称返回给我。

有谁知道我会怎么做？

Answer 1

首先，你需要把对象放在一个集合中。要做到这一点，你需要选择一个数据结构（列表，ArrayList的，等等）

Dim Items as List(Of IPAddressDataItem) 

然后，您可以通过收集迭代，查找基于搜索条件的项目，并返回所需的数据。

Function GetName(ByVal IP As String) As String 
    For Each Item As IPAddressDataItem In Items 
     If Item.IP.CompareTo(IP) = 0 Then 
      Return Item.Name 
     End If 
    Next 
End Function 

现在，如果你有一个对象的实例，你可以直接访问属性。