載入（窗口1，，真）
窗口1 創建完畢
上面寫：
標簽1.標題=“正在載入。。。”
處理事件（）
計次循環首（100，）
進度條1.位置=進度條1.位置+1
延時（取隨機數（10，100））
計次循環尾（）
標簽1.標題=“加載完畢”
延時（1000）
銷毀（）
簡易加載，僅供參考，滿意請采納