2113可以通过计次循环得到一串字符5261串，达到你想要的结果。4102
以下提供的代码具有通用性。
代1653码如下：
.版本 2
.子程序 取随机长度文本, 文本型
.参数 取汉字的文本, 文本型
.参数 取出的数目, 整数型
.局部变量 Temp, 整数型
.局部变量 取出的文本, 文本型
置随机数种子 ()
.计次循环首 (取出的数目, )
取出的文本 ＝ 取出的文本 ＋ 取文本中间 (取汉字的文本, 取随机数 (1, 取文本长度 (取汉字的文本) ÷ 2) × 2 － 1, 2)
.计次循环尾 ()
返回 (取出的文本)
调用代码如下（实例）：
编辑框_输出结果.内容 ＝ 取随机长度文本 (编辑框_姓.内容, 到整数 (编辑框_姓长度.内容)) ＋ 取随机长度文本 (编辑框_名.内容, 到整数 (编辑框_名长度.内容))
在我的演示程序中易语言取游戏名，演示结果如下：
如果你不想让字重复，请使用以下代码易语言取游戏名，此代码同样具有通用性：
.版本 2
.子程序 取随机长度文本, 文本型
.参数 取汉字的文本, 文本型
.参数 取出的数目, 整数型
.局部变量 Temp, 整数型
.局部变量 临时文本, 文本型
.局部变量 随机文本, 文本型
.局部变量 取出的文本, 文本型
置随机数种子 ()
临时文本 ＝ 取汉字的文本
.计次循环首 (取出的数目, )
随机文本 ＝ 取文本中间 (临时文本, 取随机数 (1, 取文本长度 (临时文本) ÷ 2) × 2 － 1, 2)
取出的文本 ＝ 取出的文本 ＋ 随机文本
临时文本 ＝ 子文本替换 (临时文本, 随机文本, “”, , , 真)
.计次循环尾 ()
返回 (取出的文本)
此代码即符合你的要求。
如有疑问请追问。
