首页 > 开发 > 综合 > 正文

VB6如何让程序只能启动一个实例

2024-07-21 02:16:21
字体:
来源:转载
供稿:网友
国内最大的酷站演示中心!
1、在vb6中新建立一个工程
2、在form1的load事件中加入下面这段代码:

'本程序只能运行一次的判断
if app.previnstance = true then '判断程序是否已运行,如果为真
title = app.title '记录下本程序的标题
call msgbox(app.title + "(版本 " & app.major & "." & app.minor & "." & app.revision & ")已运行!", vbinformation) '产生一个提示对话框
app.title = "第二次执行" '改变本程序标题,这样才不会激活自己
appactivate title '激活先前已执行的程序
end '结束本次执行之实例,保证仅运行一个程序
end if
3、将程序编译后,将可执行程序运行两次你就会发现这个程序只能允许启动一个实例。
正文
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表