Problema com rotina

Estou desenvolvendo uma agenda e quando solicito para gravar um contato da uma mensagem de erro na rotina carregagrid. Essa rotina carrega os contatos do array para o datagridview e também mostra o resultado da pesquisa feita no txtPesquisa. A mensagem de erro é a seguinte: *Object reference not set to an instance of an object.

O programa faz tudo normalmente, só quando vai carregar o grid que da este problema.

Obs: Meu arquivo texto esta em branco sem nenhum contato salvo. Estou tentando incluir meu primeiro contato.

Código esta abaixo:

Private Sub carrGrid()

dgvContatos.Rows.Clear()

For i = 1 To arrayNome.Length - 1

If arrayNome(i).ToUpper.Contains(txtPesquisa.Text.ToUpper) Then (*neste ponto da o erro)

dgvContatos.Rows.Add(arrayNome(i), arrayRef(i), arrayTelRes(i))

End If

Next

lblQtdRegistro.Text = "Quantidade de contato: " & arrayNome.Length - 1

End Sub