易语言禁止程序重复运行？

这边我拿QQ跟你做例子，就是不知道你是不是想实现这种效果。

.版本 2

.支持库 eAPI

.程序集 窗口程序集_启动窗口

.程序集变量 进程列表, 进程信息, , "0"

.程序集变量 进程标识符, 整数型

.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击

时钟1.时钟周期 ＝ 1000

.子程序 _时钟1_周期事件

.局部变量 i, 整数型

.局部变量 b, 整数型

进程列表 ＝ 取系统进程列表 ()

.计次循环首 (取数组成员数 (进程列表), i)

  .如果真 (进程列表 [i].进程名称 ＝ “QQ.exe”)

      进程标识符 ＝ 进程列表 [i].进程标识符

      跳出循环 ()

  .如果真结束

.计次循环尾 ()

.计次循环首 (取数组成员数 (进程列表), b)

  .如果真 (进程列表 [b].进程名称 ＝ “QQ.exe”)

      .判断开始 (进程标识符 ＝ 进程列表 [b].进程标识符)

      .默认

          终止进程 (进程列表 [b].进程标识符)

      .判断结束

  .如果真结束

.计次循环尾 ()

是的，不能重复调用。在同一个程序集中,子程序名不能重复调用。

易语言是一门以中文作为程序代码的编程语言，其以“易”著称，创始人为吴涛。易语言早期版本的名字为E语言。创造易语言的初衷是进行用中文来编写程序的实践，方便中国人以中国人的思维编写程序，并不用再去学习西方思维。易语言的诞生极大地降低了编程的门槛和学习的难度。

具体介绍：

子程序可以在其它事件子程序和新建子程序中多次被调用，也可以被其它程序集的事件子程序和新建子程序调用。要注意的是，子程序只能在本程序中使用。

每次调用子程序时，子程序中的所有语句都将被从第一条开始顺序执行，当执行到子程序尾部或者遇到“返回”命令时即返回到调用此子程序语句的下一条语句处。

子程序必须由其它事件子程序调用。子程序的调用方法与命令的调用方法完全一致，和命令一样，也可以点击子程序调用行的前面的＋号，会出现子程序的解释。

子程序可以接收参数，所定义的各参数的数据类型及参数数目决定了该子程序所能够接收的参数数据的类型和数目，具有参数的子程序在被调用时必须提供与参数数目相同的数据。

最简单的方法就是程序启动时检查系统已运行的进程中是否有自己，如果有就提示并终止。

这种方法编写简单，但不够准确，容易误判。

还有一种方法就是设置系统全局的标识符，程序启动时检查标识符是否存在，这更准确一些。

---