|
发表于 2012-10-7 18:38:40
|
显示全部楼层
湖南省长沙市
一早起来。。。汗
破天荒给你一次代码
.版本 2
.程序集 窗口程序集1
.程序集变量 按钮数组, 按钮, , "5"
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.计次循环首 (5, i)
复制窗口组件 (按钮1, 按钮数组 [i])
按钮数组 [i].左边 = i × 64 + 8
按钮数组 [i].顶边 = 0
按钮数组 [i].可视 = 真
按钮数组 [i].标记 = 到文本 (i)
.计次循环尾 ()
.子程序 _按钮1_被单击
.局部变量 事件组件, 按钮
事件组件 = 取事件组件 ()
.判断开始 (事件组件.标记 = “1”)
输出调试文本 (“第一个复制按钮被按下!”)
.判断 (事件组件.标记 = “2”)
输出调试文本 (“第二个复制按钮被按下!”)
.判断 (事件组件.标记 = “3”)
输出调试文本 (“第三个复制按钮被按下!”)
.判断 (事件组件.标记 = “4”)
输出调试文本 (“第四个复制按钮被按下!”)
.判断 (事件组件.标记 = “5”)
输出调试文本 (“第五个复制按钮被按下!”)
|
|