两个我认为较难的问题

第一个太简单了：
@echo off
set /p "str=输入字符串："
call:Length "%str%" "l"
echo 长度是：%l%。
pause>nul
exit /b 0
:Length
setlocal enabledelayedexpansion&set /a "_len_=-1"
set "__str=%~1"
:__Len_FUNCTION
set /a "_len_+=1"
for /f %%i in ("%_len_%") do if not "!__str:~%%i,1!"=="" goto :__Len_FUNCTION
Endlocal&set "%~2=%_len_%"&goto :EOF

医生的有点看不懂..这个是我的
@echo off
set /p "str=输入字符串："
call :length
echo 长度是：%l%。
pause>nul
exit
:length
setlocal enabledelayedexpansion
set "str=!str!o"
for /l %%a in (1,1,0) do (
if "!str:~%%a,1!"=="o" (goto :eof)
)

错了，重发    -------samkt
@echo off
set /p "str=输入字符串："
call :length
echo 长度是：%l%。
pause>nul
exit
:length
setlocal enabledelayedexpansion
set "str=!str!o"
for /l %%a in (1,1,99999) do (
if "!str:~%%a,1!"=="o" (set l=%%a&goto :eof)
)