Como pesquisar um valor nos elementos de uma matriz e retornar o índice do primeiro elemento que se encaixa nos requisitos da busca

'Este exemplo mostra como pesquisar um valor nos
'elementos de um array e retornar o índice do
'primeiro elemento que se encaixa nos requisitos
'da busca

'Neste exemplo vamos obter o índice do primeiro elemento
'que contenha um nome de cidade começando com a
'letra "C"

Module Module1
  Sub Main()
    ' cria um array de strings
    Dim cidades() As String = {"Goiânia", "Cuiabá", "Curitiba", _
      "São Paulo", "Florianópolis"}

    'obtém a posição do primeiro elemento que contém um
    'um nome de cidade que começa com a letra "C"
    Dim pos As Integer = Array.FindIndex(cidades, _
       AddressOf Encontrar)
    'exibe o índice do elemento encontrado
    If pos <> -1 Then
      Console.WriteLine("O valor foi localizado no índice " _
        & pos)
    Else
      Console.WriteLine("O valor não foi encontrado")
    End If

    Console.ReadKey()
  End Sub

  Private Function Encontrar(ByVal str As String) As Boolean
    If str.StartsWith("C") Then
      Return True
    Else
      Return False
    End If
  End Function
End Module