| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何删除文本文件中的空白行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183623) |
| -- 作者：lanbor -- 发布时间：2022/11/9 16:28:00 -- 如何删除文本文件中的空白行 请教专家 当我通过读文本文件到 strs 变量后！ Dim strs As String = FileSys.ReadAllText(file) 发现这里面有很多空白行， 我应该如何删除 strs 文件内容中的空白行？ -----例如内容中有如下行----- aaaaa; bbbb; cccc; ddd; 1314529; www-aa; gggg-bb; ----------end----------- 感谢！感谢！
|
| -- 作者：有点蓝 -- 发布时间：2022/11/9 16:30:00 -- dim ss() as string = strs.replace(vbcr,"").split(vblf) for each s as string in ss if s.trim() == "" then msgbox("空行") else msgbox("对不空的行进行处理") endif next
|