计算字符串长度.bat

namejm写的批处理

@echo off & setlocal EnableDelayedExpansion
:: 计算字符串的长度
:: code by willsort 2006-3-30  CMD@XP
:began
set mystr=
set /p mystr=输入要计算长度的字符串(直接回车退出):
if not defined mystr goto :eof
for /l %%i in (0,1,1000) do if "!mystr:~%%i,1!"=="" set strlen=%%i && goto :_endfor
:_endfor
::echo 字符串:  "%mystr%"
echo 长  度:  %strlen%
set strlen=
goto began

该方案的缺陷是：当字符串长度超过1000的时候，将不能探测到；不过变量能接收的长度好象还不能超过1000

另外一种方案：

@echo off
:: code by JM 2006-10-9 CMD@XP
set mystr=
set /p mystr=输入要计算长度的字符串(直接回车退出):
if not defined mystr goto :eof
set count=0
setlocal enabledelayedexpansion
:intercept
set /a count+=1
for /f %%i in ("%count%") do if not "!mystr:~%%i,1!"=="" goto intercept
echo 长  度:  %count%
pause