إغلاق الصوت بمجرد الخروج من النموذج

السلام عليكم

لدي نموذج يقوم بتشغيل ملف صوت مرفق بملف القاعدة يعمل من خلال هذا الكود في حدث عند فتح النموذج عند بداية تشغيله 

Call PlaySound(Application.CurrentProject.Path & "\PraytoMohammed1.WAV")

والمساعدة المطلوبة تتمثل في إيجاد أو إنشاء كود في حدث عند الاغلاق يعمل علي غلق الصوت بمجرد غلق النموذج لأنه الصوت حالياً يظل يعمل بعد غلق النموذج وشكراً