負載(窗口1,,真)
窗口1已創建。
上面寫著:
標簽1。Title = "正在加載。。。"
處理事件()
計數循環頭(100,)
進度條1。位置=進度條1。位置+1。
延遲(隨機數(10,100))
計數周期尾部()
標簽1。Title = "已完成加載"
延遲(1000)
銷毀()
簡單加載,僅供參考,滿意請采納。