1.ȡ?取外??ο???ҳԴ??
ȡ???ο???ҳԴ??
.版本 2
.程序集 窗口程序集1
.程序集变量 颜色序号, 整数型
.子程序 _标签1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
颜色序号 = 颜色序号 + 1
.判断开始 (颜色序号 = 1)
外形框1.线条颜色 = #红色
.判断 (颜色序号 = 2)
外形框1.线条颜色 = #
**.判断 (颜色序号 = 3)
外形框1.线条颜色 = #蓝色
.判断 (颜色序号 = 4)
外形框1.线条颜色 = #绿色
.判断 (颜色序号 = 5)
外形框1.线条颜色 = #橙黄
.判断 (颜色序号 = 6)
外形框1.线条颜色 = #紫色
.判断 (颜色序号 = 7)
外形框1.线条颜色 = #白色
颜色序号 = 0
.默认
.判断结束
外形框1.线条颜色 = #黑色 ‘“#”后加什么颜色就是什么颜色
要变多少次就多少次,记得在最后一次得加 颜色序号 = 0 它才能循环变色。形框asp网址导航源码如:.
判断 (颜色序号 = 9)’假如“9”是网页麻将app源码免费最后一次
外形框1.线条颜色 = #白色
颜色序号 = 0 ‘注意这里