Aplikasi hanya jalan sekali

Ini buat catatan saja, kadangkala saat kita menjalankan file exe dari sebuah program, file exe tersebut dapat dijalankan lebih dari satu kali. Akibatnya terdapat form yang sama. Berikut ini adalah trik agar form hanya jalan satu kali.
Cukup tambahkan object App.PrevInstance, untuk mendeteksi apakah aplikasi sudah running atau belum...
Private Sub Form_Load()
If App.PrevInstance = True Then End
End Sub

Advertisement