如何在VB.NET中搜索数组？

Imports System

Module Module1
    Sub Main()
        Dim arr(9) As Integer
        For i As Integer = 0 To 9
            arr(i) = i * 2
        Next

        ' 使用For循环遍历数组，并使用If语句判断数组元素是否满足条件
        For Each element In arr
            If element = 6 Then
                Console.WriteLine("找到了数字6")
            End If
        Next

        ' 使用Array.Find方法
        Dim foundElement As Integer = Array.Find(arr, Function(x) x = 6)
        If foundElement <> 0 Then
            Console.WriteLine("使用Array.Find方法找到了数字6")
        End If

        ' 使用Array.FindAll方法
        Dim foundElements() As Integer = Array.FindAll(arr, Function(x) x > 6)
        If foundElements.Length > 0 Then
            Console.WriteLine("使用Array.FindAll方法找到了以下元素：")
            For Each element In foundElements
                Console.WriteLine(element)
            Next
        End If
    End Sub
End Module