在vb.net中搜索数组

在VB.NET中搜索数组，可以使用For循环遍历数组中的每个元素，然后检查每个元素是否满足搜索条件。如果满足条件，则将该元素添加到一个新的数组中，最后返回这个新的数组。

以下是一个示例代码：

Public Shared Function SearchArray(ByVal arr As Array, ByVal searchTerm As String) As Array
    Dim foundTerms As New List(Of String)
    For Each item As Object In arr
        If TypeOf item Is String Then
            Dim str As String = CType(item, String)
            If str.Contains(searchTerm) Then
                foundTerms.Add(str)
            End If
        End If
    Next
    Return foundTerms.ToArray
End Function

在这个函数中，我们首先创建一个新的List(Of String)对象，用于存储满足搜索条件的元素。然后使用For循环遍历数组中的每个元素，如果该元素是字符串类型，就将其转换为字符串类型，并检查是否包含搜索条件。如果包含搜索条件，则将该元素添加到foundTerms列表中。最后，返回foundTerms列表转换为数组后的结果。

需要注意的是，这个函数只是一个示例，并没有对数组进行排序或删除重复元素的操作。在实际应用中，可以根据需要对该函数进行修改和优化。