[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
指定的字符串中会有特殊字符吗?
心绪平和,眼藏静谧。

TOP

  1. @echo Off & setlocal EnableDelayedExpansion
  2. set "var=tEST" & set "str=!var!"
  3. set "Lower=a b c d e f g h i j k l m n o p q r s t u v w x y z"
  4. set "Upper=A B C D E F G H I J K L M N O P Q R S T U V W X Y Z"
  5. For %%a in (%Lower%) do set "var=!var:%%a=%%a!"
  6. For /L %%a in (0 2 51) do (set "_!Lower:~%%a,1!=!Upper:~%%a,1!")
  7. :Loop
  8. If defined str (
  9.     set "AlphaL=%str:~,1%" & set "AlphaU=%var:~,1%" & set "Letter=!AlphaU!
  10.     If "!AlphaL!" equ "!AlphaU!" If defined _!AlphaL! (set "Letter=!_%str:~,1%!")
  11.     set "str=%str:~1%" & set "var=%var:~1%"
  12.     <nul set /p=!Letter!& goto :Loop
  13. )
  14. Echo\ & Pause>nul
复制代码
心绪平和,眼藏静谧。

TOP

返回列表