.版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 按钮, 按钮
.子程序 __启动窗口_创建完毕
.局部变量 n, 整数型
按钮1.标记 = “1”
.计次循环首 (4, n)
复制窗口组件 (按钮1, 按钮)
按钮.可视 = 真
按钮.标题 = “按钮” + 到文本 (n + 1)
按钮.左边 = 按钮1.左边 + (按钮1.宽度 + 10) × n
按钮.标记 = 到文本 (n + 1)
.计次循环尾 ()
.子程序 _按钮1_被单击
按钮 = 取事件组件 ()
信息框 (“被单机按钮的标题为:按钮” + 按钮.标记, 0, “按钮” + 按钮.标记 + “被单机”, )