[文本处理] [已解决]批处理call命令调用子程序，一定要在子程序最后加goto:eof

有理想的猪

我参考我们论坛以前的帖子，写了一个可以统计一个文本文件中各字符串出现频率的批处理。
但运行结果很奇怪！
上代码：

@echo off &setlocal enabledelayedexpansion
set /p d=请把待统计的文本文件拖进来：

call :test
for /f "tokens=1,* delims=_=" %%i in ('set _') do echo %%i出现的次数为：%%j

pause>nul


:test
for /f "delims=" %%l in (%d%) do (
set str=%%l
call :calc
)

:calc
 for /l %%i in (0 1 100) do (
    set "var=!str:~%%i,1!"
     echo !var!
    if "!var!"=="" goto :eof
    set /a _!var!+=1
 ) 
复制代码

假如有一个文本文件aad.txt
内容：
123123
qwe



运行后发现：文本最后一行为什们被计数了两遍。。。。

路过

也可以用exit /b，执行效果类似goto :eof

有理想的猪

先谢谢2楼了。

如果有和我一样不懂的菜鸟，可以参考这篇博客：http://blog.163.com/hlz_2599/blog/static/14237847420111015103529478/

在本例中，在执行完最后一行文本统计后，若14行后面没有goto :eof，就会再次进入calc，也就是最后一行文本会被计数两遍。。。。


在用 call 调用子程序时，在子程序的最后一定要加上 goto :eof 让它返回到 call 那里，不然，批处理会继续执行下去，也就达不到实际的效果了

注：如果子程序的下面没有代码了，那加不加都是一样的

DAIC

在第7行和第14行下面分别加一句：
goto :eof