@echo off&setlocal enabledelayedexpansion&for /f "delims=" %%i in (in.txt) do set p=                                                                                %%i&set p=!p:~-80!&echo !p:  = !
复制代码

set p=t                                                                   %%a&set p=!p:~-80!
set p=!p:t  = !
复制代码

@echo off
set "sp=                                                                                        " 80个空格
for /f "delims=" %%a in (abc.txt) do (
        set p=%sp%@#%%a
        setlocal enabledelayedexpansion
        set p=!p:~-81!
        for /f "tokens=1 delims=@" %%b in ("!p:  = !") do endlocal&echo;%%b%%a
)
::可以处理for /f 能读取到的任何半角字符
复制代码

'给本VBS取名为test.vbs
'运行此VBS的方式：
'在CMD下输入：cscript //nologo test.vbs
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("a.txt", 1)
DO Until objTextFile.AtEndOfStream
    strLine = objTextFile.ReadLine
    intCha = (80 - Len(strLine))\2
    strSpace = Space(intCha)
    WSH.StdOut.WriteLine strSpace & strLine
Loop
复制代码

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 20) do set "k=    !k!"
for /f "tokens=* delims= " %%a in (a.txt) do (
   set "str=%%a%k%"
   set "str=!str:~0,79!"
   set "str=!str:*%%a=!"
   if "!str:~0,1!"==" " (set str=!str:  = !) else set "str="
   echo !str!%%a
) 
pause
复制代码