[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
12
返回列表 发帖
HOPE2021

Rank: 4

帖子
365 
积分
493 
技术
38  
捐助
0  
注册时间
2021-8-8 
4楼 跳转到 »
发表于 2022-12-31 15:46 | 只看该作者
回复 3# crazy014
不客气！
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

crazy014

Rank: 1

帖子
3 
积分
15 
技术
0  
捐助
0  
注册时间
2022-12-30 
3楼
发表于 2022-12-31 15:40 | 只看该作者
我去试试，谢谢你

TOP

HOPE2021

Rank: 4

帖子
365 
积分
493 
技术
38  
捐助
0  
注册时间
2021-8-8 
2楼
发表于 2022-12-31 15:39 | 只看该作者
回复 1# crazy014
这样可以吗？
  1. @Echo Off

  2. Cls

  3. 

  4. :Start

  5. 	%= 下面一行代码产生一个小于 9000 的随机数，并加上 1000，就是任意的四位数 =%

  6. 	Set /A "Rand=1000+%Random%%%9000"

  7. 	Echo.%Rand%

  8. 	Pause

  9. @Goto :Next

  10. 

  11. :Next

  12. 	Echo.%Rand%

  13. Pause
复制代码
Why join the navy, if you can be a pirate? - Steve Jobs

TOP

12
返回列表