分类：电脑/网络
问题：有没有什么工具可以自动把两行间的空白行去掉像上面这样得文字,当然 
  像上面这样得,当然,数量很多,有几千条,有没有什么方法(手动的不算)或者什么工具可以把两行之间的空行去掉.......
回答：首先 将你需要修改的东西 保存在一个文本文件里(这里 假设是 :\test.txt）打开记事本 输入以下：Const ForReading = 1Const ForWriting = 2Set objFSO = CreateObject("Scripting.FileSystemObject")Set objFile = objFSO.OpenTextFile("C:\Test.txt", ForReading)Do Until objFile.AtEndOfStream    strLine = objFile.Readline    strLine = Trim(strLine)    If Len(strLine) > 0 Then        strNewContents = strNewContents & strLine & vbCrLf    End IfLoopobjFile.CloseSet objFile = objFSO.OpenTextFile("C:\Test.txt", ForWriting)objFile.Write strNewContentsobjFile.Close另存为 rename.vbs只要运行 rename.vbs 就可以将 C:\test.txt文件中所有的空白行去掉注意：这里的C:\test.txt只是举例说明，你需要根据实际情况 更改上面的两处代码不要感谢我 给我加分吧