易语言不知道路径怎样打开文件?

Question

就是打击按钮一，查找编辑框1的内容，如果有该文件，把路径写在编辑框2中，再弹出信息框，是否打开。是就打开

Answer 1

.版本
2
.支持库
eAPI
.程序集
窗口程序集1
.程序集变量
找到,
逻辑型
.子程序
_按钮1_被单击
.局部变量
盘符,
文本型,
,
"0"
.局部变量
i,
整数型
盘符
=
取驱动器列表
()
.计次循环首
(取数组成员数
(盘符),
i)
枚举文件
(盘符
[i])
.计次循环尾
()
.子程序
枚举文件
.参数
路径,
文本型
.局部变量
文件名,
文本型
.如果真
(取文本右边
(路径,
1)
≠
“\”)
路径
=
路径
+
“\”
.如果真结束
文件名
=
寻找文件
(路径
+
编辑框1.内容
+
“.*”,
)
'
这个是不带后缀搜索的例如
(QQ)，如果知道后缀名的话例如
(QQ.EXE)
'
把
文件名
=
寻找文件
(路径
+
编辑框1.内容
+
“.*”,
)
'
换成
文件名
=
寻找文件
(路径
+
编辑框1.内容
,
)
.判断循环首
(文件名
≠
“”
且
找到
=
假)
处理事件
()
.如果真
(寻找文本
(到大写
(文件名),
到大写
(编辑框1.内容),
,
假)
≠
-1)
编辑框2.加入文本
(文件名
+
#换行符)
.判断开始
(信息框
(“找到一个匹配文件!”
+
#换行符
+
#换行符
+
路径
+
文件名
+
#换行符
+
#换行符
+
“点击
确认按钮
运行程序!”
+
#换行符
+
#换行符
+
“点击
取消按钮
将继续寻找下一个文件!”,
#确认取消钮,
)
=
#确认钮)
运行
(路径
+
文件名,
假,
)
找到
=
真
.默认
文件名
=
“”
.判断结束
.如果真结束
.判断循环尾
()
文件名
=
寻找文件
(路径
+
文件名
+
“*.*”,
#子目录)
.判断循环首
(文件名
≠
“”)
.如果真
(文件名
≠
“.”
且
文件名
≠
“..”)
枚举文件
(路径
+
文件名)
.如果真结束
文件名
=
寻找文件
(,
#子目录)
.判断循环尾
()
'
本人新开了一个新手交流群，有兴趣朋友可以加入。
51385920
'
一个交流的平台，不分高低。大家遇到的问题可以在这里提出来，相互帮助，相互提高。
'
热烈欢迎高手加入指点。