محتاجة كود اظهار صوت عند التأشير على صورة

الاخت الكريمه يمكنك وضع اداة MediaPlayer وارفق بها ملف الصوت الذى تريد واكتبى الكود تشغيل ملف صوت الاداة فى الحدث كليك للـ Image

وهاهو الكود

Private Sub Image1_Click ()
WindowsMediaPlayer1.URL = App.Path & "/Exit.mp3"
WindowsMediaPlayer1.Control.Play
End Sub

وذلك اعتباراً ان اسم الملف الصوتى هو Exit وصيغته Mp3

وفقق الله

السلام عليكــم ورحمـة الله وبركاتــه ،،

جربى هذا الكود

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1		 '  play asynchronously

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
sndPlaySound "C:\exit.wav", SND_ASYNC
End Sub