1. 首页
  2. 编程语言
  3. VB
  4. 下载

VB防止程序重复运行

下载
flow_specter 50 0 TXT 2019-05-13 01:05:58

VB防止程序重复运行

用户评论
请输入评论内容
评分：
Generic placeholder image 卡了网匿名网友 2019-05-13 01:05:58

程序源码写的不够完美

Generic placeholder image 卡了网匿名网友 2019-05-13 01:05:58

Option Explicit txt文件,内容如下: Public Sub CheckExist(fm As Form) Dim title As String If App.PrevInstance Then title = App.title Call MsgBox("这程序已执行", vbCritical) App.title = "" '如此才不会Avtivate到自己 fm.Caption = "" AppActivate title 'activate先前就已行的程序 End E