国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發 > 綜合 > 正文

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、將程序編譯后,將可執行程序運行兩次你就會發現這個程序只能允許啟動一個實例。
正文
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 濮阳县| 盐城市| 台中县| 湘潭县| 绍兴市| 靖远县| 蓬溪县| 和林格尔县| 宿迁市| 铁岭县| 阳原县| 海兴县| 阆中市| 崇明县| 天台县| 满城县| 郁南县| 澜沧| 中江县| 瑞安市| 汕头市| 隆林| 习水县| 邹平县| 娄底市| 彩票| 张家川| 普洱| 贡山| 饶阳县| 阳原县| 阜康市| 陵川县| 洪洞县| 斗六市| 河南省| 阆中市| 万全县| 巢湖市| 威海市| 子洲县|