国产探花免费观看_亚洲丰满少妇自慰呻吟_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、將程序編譯后,將可執行程序運行兩次你就會發現這個程序只能允許啟動一個實例。
正文
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 甘孜| 太康县| 宜昌市| 阿巴嘎旗| 罗定市| 三明市| 平远县| 朝阳县| 临高县| 新营市| 南宫市| 黑山县| 亳州市| 崇阳县| 牡丹江市| 鹰潭市| 台州市| 海伦市| 海门市| 新津县| 准格尔旗| 土默特右旗| 通许县| 绥德县| 大安市| 汪清县| 铜鼓县| 琼中| 淮南市| 天门市| 望奎县| 永寿县| 玉溪市| 绵竹市| 宁安市| 图木舒克市| 景东| 芒康县| 新竹县| 温宿县| 邵东县|