Removing Items in a List While Iterating Through It with For Each Loop

Question

I have a list named NeededList I need to check each item in this list to see if it exists in my database. If it does exist in the database I need to remove it

Answer 1

How about this (no iteration needed):

NeededList = (NeededList.Where(Function(Needed) IsNeeded(Needed)).ToList

Function IsNeeded(Needed As ...) As Boolean
    ...
    Return Not dr.HasRows
End Function