路过

@echo off
set d=0
setlocal enabledelayedexpansion

:lc
set/a a=%random%%%9000+1000
set p=n!a!
for /l %%a in (0,1,9) do (set q=!p:%%a=!
 if !q! neq !p! (if "!q:~3,1!"=="" (goto lc)
 )
)
set/a d+=1
echo;!a!
if %d% equ 4 (pause&exit)
goto lc
复制代码

生成4个