易语言如何载入窗口1后 延迟2s自动关闭

启动窗口创建完毕
载入窗口1
假
启动窗口销毁
然后在双击窗口1
窗口1下写下代码
延迟（2000）销毁
这样就行了
不懂在问我49965361这个的意思是启动窗口创建完毕后就会载入窗口1
然后启动窗口会自动销毁只留下窗口1
窗口创建完毕后就会等待两秒然后销毁
不懂再问

易语言中有一个内置函数Sleep可以用来延迟程序的执行。这个函数的参数是毫秒数，也就是指定延迟的时间。用户可以在程序中使用Sleep函数，将延迟时间设为自己想要的数值。例如，延迟5秒可以使用Sleep(5000)。用户也可以在程序中加入一个输入框或者命令行参数等方式来动态指定延迟时间，从而由用户自己决定延迟时间。

延时（1000）
调用格式：
〈无返回值〉
延时
（整数型
欲等待的时间）
-
系统核心支持库->系统处理
英文名称：sleep
本命令暂停当前程序的运行并等待指定的时间。本命令为初级命令。
参数<1>的名称为“欲等待的时间”，类型为“整数型（int）”。本参数指定欲暂停程序执行的时间，单位为毫秒。
*** 作系统需求：
Windows、Linux
请采纳，谢谢！

版本 2
支持库 shell
子程序 __启动窗口_可否被关闭, 逻辑型
局部变量 路径, 文本型
局部变量 后缀, 文本型
路径 ＝ 取运行目录 () ＋ “\”
后缀 ＝ #引号 ＋ “)”
写到文件 (路径 ＋ “temvbs”, 到字节集 (#aa ＋ 路径 ＋ 取执行文件名 () ＋ 后缀 ＋ #换行符 ＋ #bb ＋ 路径 ＋ “temvbs” ＋ 后缀))
执行 (, 路径 ＋ “temvbs”, , )
版本 2
常量 aa, "<文本长度: 85>"
aa的内容：
Dim fso
Set fso = CreateObject("ScriptingFileSystemObject")
fsoDeleteFile("
常量 bb, "<文本长度: 18>"
bb的内容：
fsoDeleteFile("
看不懂可以加我HI友
"延迟(1000)
_启动窗口销毁() 代码好像是个这。但我不能。。"
兄弟，你太有才了 假如这样你能就怪了，不行是正常滴！
销毁你以为就可以删除自身啊？！ 就是关闭程序而已
你有模块 一句话就行了
不是 删除自身（） 就是 程序自杀（）
前提是 你得找到包含有程序自杀的模块并且加入该模块！

---