الرجاء المساعدة

بسمه تعالى

اخواني الاعزاء السلام عليكم جميعا

انا مبتدئ في الفيجوال بيسك واردت تشغيل ملف صوتي عن طريق زر اوامر (كوماند بوتم ) على فورم وكتبت الكود التالي في الفورم

Private Sub Form_Load()

Dim filename

MMControl1.Visible = False

MMControl1.DeviceType = "waveAudio"

filename = App.Path

If Right(filename, 1) <> "" Then

filename = filname + ""

End If

filename = filename + "scrybaby.wav"

MMControl1.filename = filename

MsgBox filename

MMControl1.Command = "open"

End Sub

========

طبعا اسم ملف الصوت مذكور وقد وضعته في دليل العمل ثم كتبت الكود التالي لزر الاوامر (كوماند بوتم اسميته بكاء )Private Sub CMDCRY_Click()

MMControl1.Command = "prev"

MMControl1.Command = "play"

=============

وشغلت المشروع وعندما ضغطت على زر الاوامر لم يظهر صوت والغريب انني ازلت الملف واعدت تشغيل المشروع فلم يعطي رساله بعدم وجود الملف طبعا انا استخدمت الملتميديا كونترول لتشغيل الصوت افيدوني رجاءا