程序窗口渐隐渐现特效模块

.子程序 渐现, , 公开
.参数 次数, 整数型
.参数 窗口句柄, 整数型
.参数 窗口, 窗口

' 句柄 ＝ _启动窗口.取窗口句柄 ()
.计次循环首 (254, 次数)
延迟 (15)
设置窗口透明度 (窗口句柄, 次数)
窗口.可视 ＝ 真
处理事件 ()
.计次循环尾 ()

' 运行这个代码前把 启动窗口的可视设置成假！否则无效
渐现 (l, _启动窗口.取窗口句柄 (), _启动窗口)