我已经构建了一个存储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地址,它会将名称返回给我。
有谁知道我会怎么做?
I have built a custom Data Class that stores IP Address Details.
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 ClassWhat I'm trying to figure out how to do is search it for specific data.
Example.. I send it an IP address and it will return the name to me.
Does anyone know how I would do this?
最满意答案
首先,你需要把对象放在一个集合中。 为此,您需要选择一个数据结构(即List,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现在,如果您有对象的实例,则可以直接访问该属性。
First of all, you need to put the object in a collection. To do this, you need to choose a data structure (i.e. List, ArrayList, etc)
Dim Items as List(Of IPAddressDataItem)Then, you can iterate through the collection, find the item based on the search criteria and return the data required.
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 FunctionRight now, if you have an instance of the object, you can just access the property directly.
更多推荐
发布评论