[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
我来个  补齐字符方法   效率不怎么样
  1. @echo off&setlocal enabledelayedexpansion
  2. for /f "tokens=*" %%i in (1.txt) do call :lp %%i
  3. for /l %%i in (1 1 %t%) do for /l %%j in (1 1 !%%il!) do set "%%iv=!%%iv! "
  4. for /f "tokens=*" %%i in (1.txt) do call :lp0 %%i
  5. pause&exit
  6. :lp0
  7. set/a n+=1
  8.     if "%1"=="" set n=& echo %str1%&set str1=&goto :eof
  9.     set "str=%1!%n%v!"
  10.     call set "str1=%str1%%%str:~,!%n%l!%%"
  11. shift
  12. goto lp0
  13. :lp
  14. set/a n+=1
  15. if not defined %n%l set %n%l=0
  16.     if "%1"=="" set n=&goto :eof
  17.     for /f "skip=1 delims=:" %%i in ('^(echo %1^&echo.^)^|findstr /o ".*"') do set m=%%i
  18.     set t=%n%
  19.     if %m% gtr !%n%l! set %n%l=%m%
  20. shift
  21. goto lp
复制代码

TOP

返回列表