.版本 2
.支持库 spec
.子程序 _按钮1_被单击
.局部变量 找到的位置, 整数型
.局部变量 个数, 整数型
调试输出 (找到的位置)
.循环判断首 ()
找到的位置 ＝ 寻找文本 (编辑框1.内容, 编辑框2.内容, 找到的位置 ＋ 1, 假)
个数 ＝ 个数 ＋ 1
调试输出 (找到的位置)
.循环判断尾 (找到的位置 ≠ 1)
信息框 (“一共找到” ＋ 到文本 (找到的位置 － 1) ＋ “个”, 0, )