屏幕右下角广告
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
.版本 2.程序集 窗口程序集1.程序集变量 伸缩判断, 逻辑型.子程序 __启动窗口_创建完毕.子程序 _时钟1_周期事件.如果 (伸缩判断 ＝ 真) .如果真 (窗口1.顶边 ＞ 取屏幕高度 () － 窗口1.高度 － 30) 窗口1.移动 (, 窗口1.顶边 － 1, , ) .如果真结束.否则 .如果真 (窗口1.顶边 ＜ 取屏幕宽度 ()) 窗口1.移动 (, 窗口1.顶边 ＋ 1, , ) .如果真结束.如果结束.子程序 _按钮_关闭_被单击伸缩判断 ＝ 假时钟1.时钟周期 ＝ 1.子程序 _时钟2_周期事件伸缩判断 ＝ 真时钟1.时钟周期 ＝ 1载入 (窗口1, , 真)时钟2.时钟周期 ＝ 0.子程序 _按钮_弹出_被单击载入 (窗口1, _启动窗口, 假)窗口1.移动 (取屏幕宽度 () － 窗口1.宽度, 取屏幕高度 (), , )_启动窗口.获取焦点 ()时钟2.时钟周期 ＝ 2000 |
运行结果：
总结
以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接
