以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  关于遍历集合内容并删除的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=90496)

--  作者：affixed --  发布时间：2016/9/14 11:26:00 --  关于遍历集合内容并删除的问题  各位大师，以下代码提示集合已修改，无法枚举。 Dim 数组() As String = {"0","1","2","3","4","5","6","7","8","9"} Dim 集合 As new List(Of String) 集合.AddRange(数组) For Each 字符 As String In 集合     If CInt(字符) / 2 > 0 Then         集合.Remove(字符)     End If Next For Each 字符 As String In 集合     Output.Show(字符) Next 请问如何通过遍历的方法来删除集合总奇数值。 谢谢！

--  作者：有点蓝 --  发布时间：2016/9/14 14:26:00 --   For i as integer = 集合.count - 1 to 0 step -1     If CInt(集合(i)) / 2 > 0 Then         集合.Remove(i)     End If Next