|
发表于 2013-12-2 01:16:51
|
显示全部楼层
河南省濮阳市
[e]
.版本 2
.程序集 窗口程序集1
.程序集变量 判断方向, 逻辑型
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 = 100 ' 创建时钟的时间,数值越小是为了让速度快一点
_启动窗口.宽度 = 300 ' 为了方便,所以调了个整数,麻烦数值自己计算
按钮1.左边 = 100 ' 让按钮同样用整数 方便计算 整数加减
按钮1.宽度 = 30 ' 按钮的宽度有关于接触_启动窗口=0 如果不是整数 可以判断小于几
判断方向 = 假 ' 假=向左 真=向右
.子程序 _时钟1_周期事件
.如果 (判断方向 = 假) ' 判断要向左
按钮1.左边 = 按钮1.左边 - 10 ' 整数每次都向左-10
.如果 (按钮1.左边 = 0) ' 判断=0 也就是按钮在窗口最左边的时候
判断方向 = 真 ' 该判断提示要向右
.否则
.如果结束
返回 () ' 返回不向下直接
.否则
.如果结束
.如果 (判断方向 = 真) ' 判断要向右
按钮1.左边 = 按钮1.左边 + 10 ' 整数每次都向左+10
.如果 (按钮1.左边 + 按钮1.宽度 = _启动窗口.宽度) ' 让按钮的最右侧=窗口最右边的时候
判断方向 = 假 ' 该判断提示要向右
.否则
.如果结束
返回 () ' 返回不执行
.否则
.如果结束
[/e]
菜鸟一枚~只为目的 不为复杂~ 大手勿喷~ |
|