Bug? For Each Bug or Feature?

        Dim ViewsMap As Map
        ...
        For Each dv As DraggableView In ViewsMap.keys
            Dim v As View
            v = dv.dView
            v.RemoveView
            ViewsMap.Remove(dv)         
        Next

Dim ViewsMap As Map
        
For Each dv As View In ViewsMap.keys
    If dv Is DraggableView Then
        Dim v As View
        v = dv.dView
        v.RemoveView
        ViewsMap.Remove(dv)
    End If       
Next

        For Each dv As DraggableView In ViewsMap.keys
            Dim v As View
            v = dv.dView
            v.RemoveView
        Next
        ViewsMap.Clear

Dim KeysToRemove As List
KeysToRemove.Initialize
For Each Key As Something In Map.Keys
 If <some condition> Then KeysToRemove.Add(Key)
Next
For Each Key As Something In KeysToRemove 
 Map.Remove(Key)
Next