[文本处理] [已解决]另一个问题：句号为行的排版，怎样批量切换到上一行行尾处？

每天几分

示例：

登高望四海
。
天地何漫漫
。
霜被群物秋
。
风飘大荒寒
。
荣华东流水
。
复制代码

每天几分

嗯，可以了！谢谢！

apang

回复 3# 每天几分


    我的Win7下可以，不知道为啥。
再试试：

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
  set/a n+=1
  set "_!n!=%%a"
  if "%%a"=="。" (
    set/a n-=1
    for %%b in (_!n!) do set %%b=!%%b!%%a
  )
) 
(for /l %%a in (1 1 !n!) do echo,!_%%a!)>b.txt
复制代码

apang

保存为bat运行，与源文件a.txt放在一起，试试吧

@echo off
more +4 "%~0">$.vbs
cscript /NoLogo $.vbs
del $.vbs&goto :eof
Set FSO = CreateObject("Scripting.FileSysTemObject")
Set File = FSO.OpenTextFile("a.txt",1)
strOut = Replace(File.ReadAll,vbCrLf & "。","。")
FSO.CreateTextFile("b.txt",true).Write strOut
复制代码