以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何从多文件列中移除doc文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=137840)

--  作者:rainbow_59
--  发布时间:2019/7/17 6:35:00
--  [求助]如何从多文件列中移除doc文件
多文件列中有doc文件和pdf文件,如何用代码移除doc文件,保留pdf文件?谢谢!
--  作者:有点蓝
--  发布时间:2019/7/17 9:01:00
--  
参考:http://www.foxtable.com/webhelp/topics/2718.htm

Dim lst As New List(of String)
lst = DataTables("表A").DataRows(0).Lines("第一列")
For i As Integer = lst.Count - 1 To 0 Step -1
    If lst(i).EndsWith(".doc") Then
        lst.RemoveAt(i)
    End If
Next
DataTables("表A").DataRows(0).Lines("第一列") = lst

--  作者:rainbow_59
--  发布时间:2019/7/17 9:36:00
--  
非常感谢!