Existe uma instrução semelhante Exit For, exceto que em vez de sair do loop, ela apenas se move para o próximo item. Por exemplo: For Each I As Item In Items If I = x Then ' Move to next item End If ' Do something Next Eu sei que poderia simplesmente adicionar um Elseà instrução If para...