Dim title As String
If App.PrevInstance Then
title = App.title
App.title = ""
Me.Caption = ""
AppActivate title
MsgBox "程序已经运行!"
Unload Me
End
End If
判断程序是否已经打开
最新推荐文章于 2022-12-19 16:43:29 发布