remover linhas do datagridview

[cerri]

Pessoal não sei o que esta acontecendo nesse caso, parece que ta pulando e ai não esta apagando as linhas que tem "0" na coluna(2), fazendo um debug eu notei que ele entra em todos os "0" no if mas parece que ele só apagar 1 e no proximo ele não apaga. O que pode ser?

Dim zero As String

Dim valorcel As String

zero = "0"

For Each Col As DataGridViewRow In DGcaptacao.Rows

valorcel = CStr(Col.Cells(2).Value)

If valorcel = zero Then

DGcaptacao.Rows.Remove(Col)

End If

Next

DGcaptacao.Refresh()