本帖最后由 taofan712 于 2017-3-10 16:26 编辑
- @echo off
- set "var=qwertyuioplkjhgfdsazxcvbnm"
- call :strLen var long
- echo;%long%
- pause&exit /b
- :strLen
-
- ( SETLOCAL ENABLEDELAYEDEXPANSION
- set "str=A!%~1!"
- set "len=0"
- for /L %%A in (12,-1,0) do (
- set /a "len|=1<<%%A"
- for %%B in (!len!) do if "!str:~%%B,1!"=="" set /a "len&=~1<<%%A"
- )
- )
- ( ENDLOCAL
- IF "%~2" NEQ "" SET /a %~2=%len%
- )
- goto :eof
复制代码 很偏门,但很好用,不忍独享,文件出处http://www.it1352.com/328587.html |