屏幕右下角廣告
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 |
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對服務器之家的支持。如果你想了解更多相關內容請查看下面相關鏈接