Imports System.Threading
Dim Mutex_Object As Mutex 'We will be working with Mutex
Mutex_Object = New Mutex(False, "SOMETHING")
If Mutex_Object.WaitOne(0, False) = False Then
Application.Exit()
End If Публикуване
If program with this mutex is ran, and haves "SOMETHING" the same, it will close.
No comments:
Post a Comment