| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 程序_禁止重复运行 | 禁止当前程序多开运行 | ||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 标识文本 | 文本型 | 尽量输复杂一点的文本 | 是否弹出信息框提示 | 逻辑型 | 默认为假,不弹出提示; | 消息框提示文本 | 文本型 | 第二个参数设置为假,该参数则无效 | 消息框提示图标 | 整数型 | 默认为信息图标，如：#信息图标 | 是否前端显示程序 | 逻辑型 | 如果已重复运行,是否将程序在前端显示 |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 局_句柄 | 整数型 | |||||
如果真 (标识文本 ＝ “”)
标识文本 ＝ 校验_取md5 (到字节集 (“你懒得输入，我就写死，略略”)) ' 标识文本，如果有重复的，就不能打开事件，实现禁止
如果真 (OpenEventA (2031619, 假, 标识文本) ≠ 0)如果真 (是否弹出信息框提示)如果真 (是否为空 (消息框提示文本))消息框提示文本 ＝ “对不起,该进程已打开!”信息框 (消息框提示文本, 消息框提示图标, “友情提醒:”)如果真 (是否前端显示程序)局_句柄 ＝ 进程_名取句柄 (取执行文件名 ())如果真 (窗口_是否最小化 (局_句柄))窗口_还原 (局_句柄)窗口_置顶 (局_句柄)结束 ()CreateEventA (0, 假, 假, 标识文本)
词条作者信息 使用例程