كيف تتجنب تكرار تنفيذ البرنامج؟ (اكتشف ما إذا كانت هناك نسخة سابقة، وإذا كان الأمر كذلك، قم بإنهاء البرنامج الذي بدأ تشغيله حديثًا). بعد بدء تشغيل أحد البرامج، يقوم المستخدمون أحيانًا بتضييق نطاق البرنامج على شريط المهام، ثم يقومون بإعادة تشغيل البرنامج عندما يحتاجون إلى استخدامه، مما يؤدي أحيانًا إلى تلف البيانات في برامج قواعد البيانات! إذا كنت لا تريد أن يقوم المستخدمون بتشغيل البرنامج بشكل متكرر، فيمكنك استخدام كائن APP لتحديد ما يلي:
PRivateSubForm_Load()
IfApp.PrevInstanceThen'عرض الإصدار السابق
MsgBox"هذا البرنامج قيد التشغيل بالفعل!",48
نهاية
EndIf
EndSub->