前不久摸鱼时写了简单的批处理字符长度计算器

TAT

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. title by TAT v1.0
   
4. set /p str=
   
5. set /A len=0
   
6. for /L %%i in (0,0,0) do (
   
7.         set /A len=!len!+1
   
8. echo !str!        !str:~-1!
   
9.         if /I !str! EQU !str:~-1! (
   
10.                         echo 此字符串长度为len=!len!
    
11.                         pause>nul & exit
    
12.                         )
    
13.         set str=!str:~-0,-1!
    
14. )
    
15. 
    
16. rem 已知bug如下：
    
17. rem 1.直接不输入回车会出值。
    
18. rem 2.0开头的话会出错
    
19. rem 3.汉字按一个长度算，程序算出的其实是字符个数。
    
20. rem 4.cmd单次输入字符最多1021个。。

复制代码

TAT

后面注释里是几个已知BUG

Batcher

回复 1# TAT


解决第一个问题：

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. :GetInput
   
4. set "str="
   
5. set /p "str=请输入字符串："
   
6. if "x!str!" equ "x" (
   
7.     goto :GetInput
   
8. )
   
9. set "len=0"
   
10. for /l %%i in (0,0,0) do (
    
11.     set /a len=!len!+1
    
12.     echo !str!        !str:~-1!
    
13.     if /i "!str!" equ "!str:~-1!" (
    
14.         echo 此字符串长度为len=!len!
    
15.         pause
    
16.         exit
    
17.     )
    
18.     set "str=!str:~-0,-1!"
    
19. )

复制代码

hfxiang

回复 2# TAT


plp626大神已给出很好的答案
http://www.bathome.net/redirect. ... 4946&ptid=11799

qixiaobin0715

由aloha20200628提供分享。
http://bbs.bathome.net/viewthrea ... p;extra=&page=3