[Lathe1]

اريد اذا المستخدم حاول فتح البرنامج وهو مفتوح  يظهر رسالة البرنامج مفتوح بالفعل ولا يفتح البرنامج مرة اخرى

[Jounior_P]

الخاصية موجودة بالفعل في اعدادات البرنامج
project properties
Application --> Make single Instance Application

[asmarsou]

الخاصية موجودة بالفعل في اعدادات البرنامج
project properties
Application --> Make single Instance Application

تلك طريقة
اما برمجيا و كمثال

PHP كود :

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        If PrevInstance() Then
            MessageBox.Show("هناك نسخة من البرنامج مفتوحة فعلا... اغلف النسخة المفتوحة لكي تتمكن من فتح نسخة جديدة من البرنامج")
            Me.Close()
            Exit Sub
        End If
    End Sub

    Function PrevInstance() As Boolean
        If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
            Return True
        Else
            Return False
        End If
    End Function
End Class