อันนี้เป็น Code ที่ห้ามเปิดโปรแกรมซ้อนกัน นะครับ
Code ที่ผมใช้นะครับ
Unhidden Content - Enjoy The View!
ลอง ศึกษาดูนะครับCode:Dim NameStart As String = Process.GetCurrentProcess.ProcessName
Dim sameProcessTotal As Integer = Process.GetProcessesByName(NameStart).Length
If sameProcessTotal > 1 Then
MsgBox("ข้อความ") 'ในช่อง ข้อความ นั้นใส่ข้อความเตือนเมื่อเปิดโปรแกรม ซ้อนกันนะ
end
End If
