Question

易语言按键按下后再次按下会执行另一种命令

源码在此：顺便看看怎么结束搜索
.版本 2
.支持库 eAPI
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 盘符, 文本型, , "0"
.局部变量 n1, 整数型
按钮1.标题 ＝ “取消搜索”
盘符 ＝ 取驱动器列表 ()
.计次循环首 (取数组成员数 (盘符), n1)
文件搜索 (盘符 [n1])
.计次循环尾 ()
标签1.标题 ＝ “搜索完毕！共搜索到 ” ＋ 到文本 (列表框1.取项目数 ()) ＋ “ 个文件”
.子程序 文件搜索
.参数 文件目录, 文本型
.局部变量 文件, 文本型
.局部变量 找到, 逻辑型
.如果真 (找到 ＝ 真)
返回 ()
.如果真结束
.如果真 (取文本右边 (文件目录, 1) ≠ “\”)
文件目录 ＝ 文件目录 ＋ “\”
.如果真结束
文件 ＝ 寻找文件 (文件目录 ＋ “*.exe”, )
.判断循环首 (文件 ≠ “”)
处理事件 ()
标签1.标题 ＝ 文件目录 ＋ 文件
调试输出 (文件)
.如果真 (到小写 (文件) ＝ 到小写 (“cstrike.exe”))
列表框1.加入项目 (文件目录 ＋ 文件, )
找到 ＝ 真
跳出循环 ()
.如果真结束
文件 ＝ 寻找文件 (, )
.判断循环尾 ()
文件 ＝ 寻找文件 (文件目录 ＋ “*.*”, #子目录)
.判断循环首 (文件 ≠ “”)
.如果真 (取文本左边 (文件, 1) ≠ “.”)
文件搜索 (文件目录 ＋ 文件)
.如果真结束
文件 ＝ 寻找文件 (, #子目录)
.判断循环尾 ()
取驱动器列表 ()
.子程序 _按钮1_被双击
结束 ()
界面如下，看清楚我把其他的列表框什么的隐藏了

我满意的给分，我快被百度的自动推荐满意回答搞疯了。

Answer 1

用多线程
按钮反馈子程序中，先判断按钮标题，标题是“开始搜索”则改标题为“取消搜索”并启动线程，执行搜索子程序

如果标题是“取消搜索”，则强制结束线程，并改回标题。
搜索子程序自动结束的时候也会改会标题。

Answer 2

像这样
.版本 2
.支持库 eAPI
.子程序 _按钮_被单击
.如果真 (按钮.标题 ＝ “设置透明”)
按钮.标题 ＝ “取消透明”
设置窗口透明度 (取窗口句柄 (), 200)
返回 ()
.如果真结束
.如果真 (按钮.标题 ＝ “取消透明”)
按钮.标题 ＝ “设置透明”
设置窗口透明度 (取窗口句柄 (), 255)
返回 ()
.如果真结束