如何取 编辑框 随机3个符号。

qwe850197907

编辑框内容符号是   Α Β Γ Δ Ε Ζ Η Θ Ι Κ Λ Μ Ν Ξ Ο Π Ρ Σ Τ Υ Φ Χ Ψ Ωα β γ δ ε ζ ν ξ ο π ρ σ η θ ι κ λ μ τ υ φ χ ψ ωΑ Β Γ Δ Ε Ζ Η Θ Ι Κ Λ Μ Ν Ξ Ο Π Ρ Σ Τ Υ Φ Χ Ψ Ωα β γ δ ε ζ ν ξ ο π ρ σ η θ ι κ λ μ τ υ φ χ ψ ω  
如何随机取3个。  

doudou4631

是这个样子吧？

无言士

声明变量 a 文本型 数组:0    :循环数 整数型
a={Α,Β,Γ,Δ,Ε,Ζ,Η,Θ,Ι,Κ,Λ,Μ,Ν,Ξ,Ο,Π,Ρ,Σ,Τ,Υ,Φ,Χ,Ψ,Ωα,β,γ,δ,ε,ζ,ν,ξ,ο,π,ρ,σ,η,θ,ι,κ,λ,μ,τ,υ,φ,χ,ψ,ωΑ,Β,Γ,Δ,Ε,Ζ,Η,Θ,Ι,Κ,Λ,Μ,Ν,Ξ,Ο,Π,Ρ,Σ,Τ,Υ,Φ,Χ,Ψ,Ωα,β,γ,δ,ε,ζ,ν,ξ,ο,π,ρ,σ,η,θ,ι,κ,λ,μ,τ,υ,φ,χ,ψ,ω}
编辑框1.内容=""
计次循环首(取数组成员数(a),循环数)
置随机数种子(取启动时间())
编辑框1.加入文本(a[取随机数(1,取数组成员数(a))])
计次循环尾()

补充内容 (2013-12-10 19:57):
计次循环首(取数组成员数(a),循环数)
改成
计次循环首(3,循环数)'这样才是加入三次

君不见

.版本 2

.程序集 窗口程序集1
.程序集变量 数据, 字节集
.程序集变量 n, 整数型
.程序集变量 l, 整数型
.程序集变量 文本1, 文本型, , "0"
.程序集变量 文本, 文本型

.子程序 _按钮1_被单击

文本 ＝ 删全部空 (编辑框1.内容)
数据 ＝ 到字节集 (文本)
l ＝ 取字节集长度 (数据)
n ＝ 1
.判断循环首 (n ≤ l)
    .如果 (数据 [n] ＞ 127)
        加入成员 (文本1, 字符 (数据 [n]) ＋ 字符 (数据 [n ＋ 1]))
        n ＝ n ＋ 2
    .否则
        加入成员 (文本1, 字符 (数据 [n]))
        n ＝ n ＋ 1
    .如果结束

.判断循环尾 ()
编辑框2.内容 ＝ 文本1 [取随机数 (1, 取数组成员数 (文本1))] ＋ 文本1 [取随机数 (1, 取数组成员数 (文本1))] ＋ 文本1 [取随机数 (1, 取数组成员数 (文本1))]

易如反掌

楼上用空文本分割 我怎么没想到，但是你那个会取到重复文本

得罪人的血债

[e]
.版本 2
.支持库 OPenGL

.程序集 窗口程序集1
.程序集变量 程_数组, 文本型, , "0"

.子程序 _按钮1_被单击
.局部变量 局_位置, 整数型
.局部变量 局_取出长度, 整数型
.局部变量 局_文本, 文本型

.计次循环首 (2, )
    局_位置 ＝ 取随机数 (1, 取数组成员数 (程_数组))
    .如果真 (局_位置 ＝ 0)
        返回 ()
    .如果真结束
    编辑框2.内容 ＝ 程_数组 [局_位置]
.计次循环尾 ()

.子程序 __启动窗口_创建完毕

置随机数种子 (取启动时间 ())
初始化数组 ()

.子程序 _编辑框1_内容被改变

初始化数组 ()

.子程序 初始化数组
.局部变量 局_位置, 整数型
.局部变量 局_文本长度, 整数型
.局部变量 局_取出长度, 整数型
.局部变量 局_文本, 文本型

局_文本长度 ＝ 取文本长度 (编辑框1.内容)
清除数组 (程_数组)
.判断循环首 (局_位置 ＜ 局_文本长度)
    .判断开始 (是否为双字节字符 (编辑框1.内容, 局_位置))
        局_取出长度 ＝ 2
    .默认
        局_取出长度 ＝ 1
    .判断结束
    局_文本 ＝ 取文本中间 (编辑框1.内容, 局_位置 ＋ 1, 局_取出长度)
    加入成员 (程_数组, 局_文本)
    局_位置 ＝ 局_位置 ＋ 局_取出长度
.判断循环尾 ()
[/e]
准备编辑框1,编辑框2,和一个按钮。
切记:记得点回复右上角的采纳答案哦~

helper

我擦 这帖子火了

花千雪

[e]

.版本 2

.程序集 窗口程序集1
.程序集变量 数据, 字节集
.程序集变量 n, 整数型
.程序集变量 l, 整数型
.程序集变量 文本1, 文本型, , "0"
.程序集变量 文本, 文本型

.子程序 _按钮1_被单击

文本 ＝ 删全部空 (编辑框1.内容)
数据 ＝ 到字节集 (文本)
l ＝ 取字节集长度 (数据)
n ＝ 1
.判断循环首 (n ≤ l)
    .如果 (数据 [n] ＞ 127)
        加入成员 (文本1, 字符 (数据 [n]) ＋ 字符 (数据 [n ＋ 1]))
        n ＝ n ＋ 2
    .否则
        加入成员 (文本1, 字符 (数据 [n]))
        n ＝ n ＋ 1
    .如果结束

.判断循环尾 ()
编辑框2.内容 ＝ 文本1 [取随机数 (1, 取数组成员数 (文本1))] ＋ 文本1 [取随机数 (1, 取数组成员数 (文本1))] ＋ 文本1 [取随机数 (1, 取数组成员数 (文本1))][/e]