[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
修正字符串大于200后;修正连续使用本程序两次以上,len值计算错误,主要没有进行len变量清零。
修正楼主的代码:
  1. ::获取字符串的字节数
  2. ::code by youxi01@cmd_xp
  3. @echo off
  4. if "%1"=="/?" goto help
  5. if "%1"=="" goto :help
  6. call :test "%~1"
  7. echo %1的字节有:%len%
  8. :test
  9. set "var=%~1"&set len=0
  10. :lp
  11. set "var1=%var:~0,1%"
  12. if %var1% gtr Z (set /a len+=2) else set /a len+=1
  13. set "var=%var:~1%"
  14. if defined var goto lp
  15. goto :eof
  16. :help
  17. echo.&echo ==========================求字符串的字节数=================
  18. echo [使用格式]    %~nx0 "字符串"
  19. echo [使用示例]    %~nx0 "好人123"
  20. echo ============================--------=================================
  21. cmd /k
复制代码
(*^_^*)

TOP

返回列表