@echo off
setlocal enabledelayedexpansion
set str=ABCDEFGHIJKLMNOPQRSTUVWXYZ
:loop
set /a i=%random%%%26
set letter=!str:~%i%,1!
if not defined %letter% (
   set %letter%=%letter%
   set select=%select%%letter%
   set /a n+=1
   if !n!==25 goto out
)
goto loop
:out
echo %select%
pause
复制代码

@echo off
set "str=ABCDEFGHIJKLMNOPQRSTUVWXYZ"
setlocal enabledelayedexpansion
set str=%str%
for /l %%i in (26 -1 2) do (
    set /a i=!random!%%%%i
    for %%j in (!i!) do (
        for %%k in (!str:~%%j^,1!) do (
            set letter=!letter!%%k
            set str=!str:%%k=!
        )
    )
)
endlocal&set select=%letter%
echo %select%
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set "str=abcdefghijklmnopqrstuvwxyz"
set/a r=%random%%%26
echo !str:~%r%,1!
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('gawk "BEGIN{srand();split(\"ABCDEFGHIJKLMNOPQRSTUVWXYZ\",a,\"\");while(i<10){while(1){n=int(rand()*26)+1;if(b[a[n]]==0){b[a[n]]++;break}}i++;print a[n]}}"') do set/an+=1&set #!n!=%%a
set #
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('mshta "javascript:(new ActiveXObject('Scripting.Filesystemobject')).GetStandardStream(1).Write('ABCDEFGHIJKLMNOPQRSTUVWXYZ'.split('').sort(function(){return Math.random()-.5}).slice(-10).join('\r\n'));close()"') do set/an+=1&set #!n!=%%a
set #
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f %%a in ('powershell -c "'ABCDEFGHIJKLMNOPQRSTUVWXYZ'.ToCharArray()|Get-Random -count 10"') do set/an+=1&set #!n!=%%a
set #
pause
复制代码

@echo off
setlocal enabledelayedexpansion
set "str=abcdefghijklmnopqrstuvwxyz"
set /a r=%random%%%26
set char=!str:~%r%,1!
set result=!str:%char%=!
echo %result%
pause
复制代码