[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @setlocal enabledelayedexpansion
  2. set %random%=%random%
  3. @echo off
  4. ::没有在开头使用是为了对比检验结果。完全可以移到首行
  5. for /l %%i in (0 1 32767) do (if defined %%i (set i=%%i)&goto next)
  6. :next
  7. ::这里使用一个跳转是为了节约CPU资源,不直接跳转是为了防止出错。
  8. echo 随机变量为:%i%
  9. echo 其值为:!%i%!
  10. set num=0
  11. set b=%i%
  12. set c=!%i%!
  13. for /l %%a in (0 1 4) do (
  14. set /a num+=!b:~%%a,1!
  15. set /a num+=!c:~%%a,1!
  16. )
  17. echo 各位数的和为:%num%
  18. pause>nul
复制代码

试验后发现位数不足五位时会有错误提示,修改屏蔽提示。
  1. @setlocal enabledelayedexpansion
  2. set %random%=%random%
  3. @echo off
  4. for /l %%i in (0 1 32767) do (if defined %%i (set i=%%i)&goto next)
  5. :next
  6. echo 随机变量为:%i%
  7. echo 其值为:!%i%!
  8. set num=0
  9. set b=%i%
  10. set c=!%i%!
  11. for /l %%a in (0 1 4) do (
  12. set /a num+=!b:~%%a,1! 2>nul
  13. set /a num+=!c:~%%a,1! 2>nul
  14. )
  15. echo 各位数的和为:%num%
  16. pause>nul
复制代码

[ 本帖最后由 firewolf85 于 2008-12-20 19:11 编辑 ]
1

评分人数

    • wxcute: 不错,是新方法PB + 8

TOP

返回列表