中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-11 00:50

共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行

DOS批处理 & 脚本技术（批处理室） » [已结]怎样随机生成n个5位随机数并保存到txt或xls文件？

可打印版本　986 / 3

第1楼　whhlcj	发表于 2008-12-22 14:15
新手上路　发帖 4　积分 4
[已结]怎样随机生成n个5位随机数并保存到txt或xls文件？由于工作需要，我要生成2000个不重复的5位随机数，用vbs或bat怎么实现？ [ Last edited by HAT on 2008-12-22 at 16:04 ]

第2楼　moniuming	发表于 2008-12-22 14:31
银牌会员　发帖 574　积分 1,335　来自广西
@echo off for /l %%a in (1 1 2000) do (call :rdm) goto :eof :rdm set str=%random%%random%%random%%random% set str=%str:~-5% if defined _%str% goto :rdm set _%str%=ok >>rst.txt set/p=%str% <nul [ Last edited by moniuming on 2008-12-22 at 14:36 ]

第3楼　pusofalse	发表于 2008-12-22 14:58
银牌会员　发帖 646　积分 1,604
@Echo Off & setlocal EnableDelayedExpansion For /L %%a in (1001 1 3000) do ( set /a n=!random! %% 9 + 1 set .!random!!random!=!n!%%a ) For /F "tokens=2 delims==" %%a in ('set .') do Echo>>num.txt %%a start "" "num.txt" [ Last edited by pusofalse on 2008-12-22 at 16:18 ]

第4楼　whhlcj	发表于 2008-12-22 16:01
新手上路　发帖 4　积分 4
谢谢楼上2位！！ 2楼的产生后输出成文件使用空格隔开的，不如3楼每数一行不过还是感谢2位！ [ Last edited by whhlcj on 2008-12-22 at 16:03 ]

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023