جزوه و پروژه های ویژال بیسیک

چگونه از اجراي مجدد يک برنامه در ويژوال بيسيک جلوگيري شود ؟

خوب با استفاده از تيکه کد زير در فرم اصلي برنامه تان مي توانيد از اجراي مجدد (Duplicate) برنامه جلوگيري کنيد

Private Sub Form_Load()
    If App.PrevInstance = True Then
       Dim Result As Integer
       Result = MsgBox("برنامه در حال اجراست", vbInformation, "Warnnig")
       Unload Me
    End If 
End Sub