Bagaimana cara menghindari eksekusi program yang berulang? (Deteksi apakah ada salinan sebelumnya, dan jika ada, akhiri program yang baru dimulai). Setelah memulai suatu program, pengguna terkadang mempersempit program ke bilah tugas, lalu memulai ulang program saat mereka perlu menggunakannya. Hal ini terkadang menyebabkan kerusakan data pada program database! Jika Anda tidak ingin pengguna meluncurkan program berulang kali, Anda dapat menggunakan objek APP untuk menentukan sebagai berikut:
PrivatSubForm_Load()
IfApp.PrevInstanceThen'Lihat versi sebelumnya
MsgBox"Program ini sudah berjalan!",48
Akhir
AkhirJika
Sub Akhir->