中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-07 17:54 |
共 48,041 主题排行 / 350,128 发帖 / 今日 3 篇 / 48,252 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » [求助]用1.2.3.数字,VBS编程输出任意不重复的6位数号码. |
| 可打印版本 837 / 5 |
| 第1楼 JIANHUILAI | 发表于 2008-03-07 10:56 |
| 初级用户 发帖 51 积分 116 | |
|
[求助]用1.2.3.数字,VBS编程输出任意不重复的6位数号码. 用1,2,3这几个数字组成任意不重复的6位数,用VBS或批处理.编个程式.并将结果保存为记事本文件.谢谢
. 排列结果如下所示 111111 111112 111113 111121 111122 …… …… 333333 [ Last edited by JIANHUILAI on 2008-3-7 at 10:59 AM ] |
|
| 第2楼 JIANHUILAI | 发表于 2008-03-07 11:18 |
| 初级用户 发帖 51 积分 116 | |
|
有人会吗？大家费费心了.
|
|
| 第3楼 balinger | 发表于 2008-03-07 16:46 |
| 中级用户 发帖 115 积分 356 | |
|
@echo off
set a1=1 set a2=2 set a3=3 set xh6=1 :6 set xh5=1 :5 set xh4=1 :4 set xh3=1 :3 set xh2=1 :2 set xh1=1 :1 call echo %%a%xh6%%%%%a%xh5%%%%%a%xh4%%%%%a%xh3%%%%%a%xh2%%%%%a%xh1%%%>>list.txt set /a xh1+=1 if %xh1% leq 3 goto 1 set /a xh2+=1 if %xh2% leq 3 goto 2 set /a xh3+=1 if %xh3% leq 3 goto 3 set /a xh4+=1 if %xh4% leq 3 goto 4 set /a xh5+=1 if %xh5% leq 3 goto 5 set /a xh6+=1 if %xh6% leq 3 goto 6 pause [ Last edited by balinger on 2008-3-7 at 04:47 PM ] |
|
| 第4楼 slore | 发表于 2008-03-07 20:17 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
直接6重循环不是很好？
|
|
| 第5楼 balinger | 发表于 2008-03-07 20:54 |
| 中级用户 发帖 115 积分 356 | |
Originally posted by slore at 2008-3-7 08:17 PM: 谢谢指教。 @echo off for /l %%a in (1,1,3) do (for /l %%b in (1,1,3) do (for /l %%c in (1,1,3) do (for /l %%d in (1,1,3) do (for /l %%e in (1,1,3) do (for /l %%f in (1,1,3) do (echo %%a%%b%%c%%d%%e%%f>>list.txt)))))) |
|
| 第6楼 JIANHUILAI | 发表于 2008-03-08 09:02 |
| 初级用户 发帖 51 积分 116 | |
|
这里牛人真多.俺真有点自卑啊.谢谢大家帮忙.符合我的要求.
什么时候我才有这个水平.加把劲了. [ Last edited by JIANHUILAI on 2008-3-8 at 09:07 AM ] |
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |