[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. set /p char=<a.txt
  3. set n=0
  4. :o
  5. if not "%char%"=="" (
  6.     set /a n+=1
  7.     set char=%char:~1%
  8.     goto :o
  9. )
  10. set /a n-=1
  11. setlocal enabledelayedexpansion
  12. for /l %%b in (0,1,%n%) do (
  13.     for /f "delims=" %%a in (a.txt) do (
  14.         set "str=%%a"
  15.         set str%%b=!str%%b!!str:~%%b,1!
  16.     )
  17.     echo !str%%b!
  18. )
  19. pause
复制代码

TOP

返回列表