Foxtable(狐表)用户栏目专家坐堂 → [讨论]移除集合lines中的值


  共有3349人关注过本帖树形打印复制链接

主题:[讨论]移除集合lines中的值

帅哥哟,离线,有人找我吗?
天一生水
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1141 积分:11272 威望:0 精华:0 注册:2017/9/26 16:30:00
[讨论]移除集合lines中的值  发帖心情 Post By:2019/7/26 19:27:00 [只看该作者]

移除单元格多行文本中包含特定字符的行,报如图错误:

Dim lst As New List(of String)
lst = Tables("表A").Current.DataRow.Lines("第一列")
For Each ls As String In lst
    If ls.Contains("A") = True Then
        lst.Remove(ls)
    End If
Next

Tables("表A").Current.DataRow.Lines("第一列") = lst


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片 (1).jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/26 21:06:00 [只看该作者]

凡是集合遍历删除都需要倒序处理

Dim lst As New List(of String)
lst = Tables("表A").Current.DataRow.Lines("第一列")
for i as integer = lst.count - 1 to  0 step -1
    If lst(i).Contains("A") = True Then
        lst.Removeat(i)
    End If
Next

 回到顶部