السلام عليكم ورحمة الله وبركاته
السطر التالي لتشغيل صوت من مكان ثابت وأود تغيير اسم الملف ليصبح متغير بحيث يقرأ من مربع نص
للتوضيح عنما أكتب في مربع النص 5 يقوم بقراءة الملف 5 وهكذا وشكرا
rc = sndPlaySound(App.Path & "\sound\1.WAV", SND_ASYN
[ تمت الإجابة ]مطلوب تعديل هذا السطر
rc = sndPlaySound(App.Path & "\sound\" & Text1.Text &".WAV", SND_ASYN )
سبحان الله وبحمده ... سبحان الله العظيم
المبرمج أحمد كتب:rc = sndPlaySound(App.Path & "\sound\" & Text1.Text &".WAV", SND_ASYN )
أشكرك على مرورك وسرعة ردك وجزاك الله خير