使用正则表达式
.版本 2
.支持库 RegEx
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
置随机数种子 ()
.计次循环首 (10, )
编辑框1.内容 = 编辑框1.内容 + 到文本 (取随机数 (1, 10)) + “,”
.计次循环尾 ()
.子程序 _按钮_打乱_被单击
编辑框1.内容 = “”
.计次循环首 (10, )
编辑框1.内容 = 编辑框1.内容 + 到文本 (取随机数 (1, 10)) + “,”
.计次循环尾 ()
.子程序 _按钮_取出_被单击
.局部变量 正则, 正则表达式
.局部变量 数量, 搜索结果, , "0"
.局部变量 N, 整数型
编辑框2.内容 = “”
正则.创建 (“\d+”, )
数量 = 正则.搜索全部 (编辑框1.内容)
.计次循环首 (取数组成员数 (数量), N)
编辑框2.内容 = 编辑框2.内容 + “ ” + 数量 [N].取匹配文本 (编辑框1.内容, )
.计次循环尾 ()