.版本 2
.子程序 _按钮1_被单击
.局部变量 a, 文本型
.局部变量 i, 整数型
.局部变量 b, 文本型
.局部变量 c, 文本型
.局部变量 s, 整数型
.局部变量 d, 文本型
a ＝ “34556522335”
.计次循环首 (取文本长度 (a), i)
b ＝ 取文本中间 (a, i ＋ 1, 1)
.判断开始 (寻找文本 (c, b, , 假) ＝ -1)
c ＝ c ＋ b
s ＝ s ＋ 1
.默认
d ＝ d ＋ b
.判断结束
.计次循环尾 ()
输出调试文本 (“重复字：” ＋ 到文本 (d), “重复次：” ＋ 到文本 (s), “取出不重复：” ＋ 到文本 (c))