import os, random

# path = os.getcwd()
# 读取t.txt 文本中的字符串，随机输出到_a.txt中
#欲读取的文本格式为ANSI或者gbk编码格式
nextLine=0
rFile = open('t.txt', 'r')
text = rFile.readlines()
rFile.close()
wFile = open('_a.txt','w')
for line in text:
    a = (line.strip('\n')).split(" ") # 过滤换行符，使用空格分割
    while len(a) > 0: # 数组a如果有元素继续循环
        nextLine += 1
        r = random.randint(0, len(a) - 1) # 随机读取数组元素
        wFile.write(a[r] + ' ') 
        del a[r] # 删除掉写入完的元素
        if (nextLine % 10) == 0: # 10个元素，加换行符
            wFile.write('\n')
wFile.close()
print("新文本已保存在 _a.txt")
复制代码

@mshta http://bathome.net/s/hta/?group=base,hide WSH.StdIn.ReadAll().split(/\s+/).sort(function(){return Math.random()-0.5}).join(' ') <a.txt >_a.txt
复制代码

#lang racket

(require 2htdp/batch-io)
(for-each (lambda (x)
            (write-file "new.txt" x))
          (shuffle (read-words "a.txt")))
复制代码

"""
如何将一组字符串打乱原有顺序
http://bbs.bathome.net/thread-39382-1-1.html
2016年2月16日 11:25:56 依山居
"""

#方法1 利用集合无序的特性乱序，每次程序重新运行输出的序是不一样的。
#同理可以字典键唯一且无序的也是可以的。
s="爱民 玉伟 伟博 如祥 良智 富强 光耀 智博 来德 金吉 李松海"
print(set(s.split()))

#方法2 优先推荐python内置random.sample()
import random
ss="爱民 玉伟 伟博 如祥 良智 富强 光耀 智博 来德 金吉 李松海"
ns=ss.split()

#运行可见下面相同的代码输出内容的顺序不一样。
rs=random.sample(ns,len(ns))
print(rs)

rs=random.sample(ns,len(ns))
print(rs)

try:
    input("回车退出")
except SyntaxError:
    pass
复制代码

random.shuffle(items)
复制代码

@echo off
setlocal enabledelayedexpansion
set "str=爱民 玉伟 伟博 如祥 良智 富强 光耀 智博 来德 金吉 李松海"
for %%i in (%str%) do set /a n+=1 & set "_!random!_!n!=%%i"
for /f "tokens=2delims==" %%i in ('set _') do set "s=!s! %%i"
echo;!s:~1!
pause
复制代码

$a = '爱民 玉伟 伟博 如祥 良智 富强 光耀 智博 来德 金吉 李松海' -Split '\s+'
(get-Random -Input $a -Count $a.length) -join ' '
复制代码