Question

易语言怎么样才可以随机取指定文本中随机内容？

比如我有一篇文章， 我想随便取2个汉字
编辑框1内容是原文本，编辑框2内容是取出文本
谁帮帮我？ 不要思路 贴源码 不然分白给？

Answer 1

伸手党

Answer 2

。。。太难了

追问

你渣不去死- - 说的废话。

追答

你太暴力了吧....

Answer 3

你是想怎么随机呢？如果是按照一行随机的一段文本可以先读取出文本，然后分割，随机取其中的一个，如果是取一段文本的任意随机内容，可以用取文本中间命令来获取，三个参数都写得十分清楚

Answer 4

.版本 2
.支持库 OPenGL
.程序集 窗口程序集1
.程序集变量 程_数组, 文本型, , "0"
.子程序 _按钮1_被单击
.局部变量 局_位置, 整数型
.局部变量 局_文本, 文本型
.局部变量 局_取出长度, 整数型
.计次循环首 (2, )
局_位置 ＝ 取随机数 (1, 取数组成员数 (程_数组))
.如果真 (局_位置 ＝ 0)
返回 ()
.如果真结束
编辑框2.加入文本 (程_数组 [局_位置] ＋ “ ” ＋ #引号 ＋ 到文本 (局_位置) ＋ #引号 ＋ #换行符)
.计次循环尾 ()
.子程序 __启动窗口_创建完毕
置随机数种子 (取启动时间 ())
初始化数组 ()
.子程序 _编辑框1_内容被改变
初始化数组 ()
.子程序 初始化数组
.局部变量 局_位置, 整数型
.局部变量 局_文本长度, 整数型
.局部变量 局_取出长度, 整数型
.局部变量 局_文本, 文本型
局_文本长度 ＝ 取文本长度 (编辑框1.内容)
清除数组 (程_数组)
.判断循环首 (局_位置 ＜ 局_文本长度)
.判断开始 (是否为双字节字符 (编辑框1.内容, 局_位置))
局_取出长度 ＝ 2
.默认
局_取出长度 ＝ 1
.判断结束
局_文本 ＝ 取文本中间 (编辑框1.内容, 局_位置 ＋ 1, 局_取出长度)
加入成员 (程_数组, 局_文本)
局_位置 ＝ 局_位置 ＋ 局_取出长度
.判断循环尾 ()

Answer 5

.版本 2
.支持库 OPenGL
.程序集 窗口程序集1
.程序集变量 程_数组, 文本型, , "0"
.子程序 _按钮1_被单击
.局部变量 局_位置, 整数型
.局部变量 局_文本, 文本型
.局部变量 局_取出长度, 整数型
.计次循环首 (2, )
局_位置 ＝ 取随机数 (1, 取数组成员数 (程_数组))
.如果真 (局_位置 ＝ 0)
返回 ()
.如果真结束
编辑框2.加入文本 (程_数组 [局_位置] ＋ “ ” ＋ #引号 ＋ 到文本 (局_位置) ＋ #引号 ＋ #换行符)
.计次循环尾 ()
.子程序 __启动窗口_创建完毕
置随机数种子 (取启动时间 ())
初始化数组 ()
.子程序 _编辑框1_内容被改变
初始化数组 ()
.子程序 初始化数组
.局部变量 局_位置, 整数型
.局部变量 局_文本长度, 整数型
.局部变量 局_取出长度, 整数型
.局部变量 局_文本, 文本型
局_文本长度 ＝ 取文本长度 (编辑框1.内容)
清除数组 (程_数组)
.判断循环首 (局_位置 ＜ 局_文本长度)
.判断开始 (是否为双字节字符 (编辑框1.内容, 局_位置))
局_取出长度 ＝ 2
.默认
局_取出长度 ＝ 1
.判断结束
局_文本 ＝ 取文本中间 (编辑框1.内容, 局_位置 ＋ 1, 局_取出长度)
加入成员 (程_数组, 局_文本)
局_位置 ＝ 局_位置 ＋ 局_取出长度
.判断循环尾 ()