计算字符串的长度批处理

@echo off & setlocal EnableDelayedExpansion 
:: 计算字符串的长度 :: :: :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 
:: Based on willsort's codes code by JM 2006-10-9 CMD@XP 
:: 出处：http://www.cn-dos.net/forum/viewthread.php?tid=19819 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 goto :eof @echo off :: :: :began 
set /p mystr=输入要计算长度的字符串: 
echo %mystr:~0,1% | findstr /i "q" 1>nul 2>nul && exit rem 输入q退出 
call :bflen "%mystr%" rem 这两句调用bflen，返回长度到变量ret中。 echo 字符串: "%mystr%" 
echo 长 度: %ret% goto began :bflen rem 真麻烦，初始化要单独拿出来。 set num= set str= set ret= 
set str=%1 :len rem 计算字符串长度 set str=%str:~0,-1% set /a num = %num% + 1 
if defined str goto len set /a ret = %num% - 2 set num= goto :eof