השמעת מוזיקה - קבצי WAV

[הקוסם המעופף]

השמעת מוזיקה - קבצי WAV

זה ה API Private Declare Function sndPlaySound Lib "winmm.dll" Alias _ "sndPlaySoundA" (ByVal lpszSoundName As String, _ ByVal uFlags As Long) As Long וזה שורת הפקודה, sndPlaySound App.Path & "\מנגינה.wav", 9 כאשר המספר בסוף משנה את אופו השמיעה, אם יכתב בסוף הסיפרה 0 הוא ישמיע רק פעם אחת, וכדו'

 

[הקוסם המעופף]

השמעת מוזיקה - קבצי MP3

Public mp As MediaPlayer.IMediaPlayer Private Sub PlayMP3() Set mp = New MediaPlayer.MediaPlayer mp.Open txtMP3.Text & ".mp3" End Sub

 

[ארזירון]

כל הכבוד

על כל מה שכתבת. א. פעם הבאה, תשרשר את כולם במקום לפתוח מלא שרשורים נפרדים בבקשה. ב. קוד שכותבים מקיפים ב-[תחילת קוד] ו-[סיום קןד] שמופיעים למטה כדי שהקוד יהיה מיושר לשמאל וקריא. ג. בקשר לשאלה שלך של סרגל כלים - אכן צריך DLL, והוא צריך להיות רשום בצורה מסוימת ברגיסטרי כדי להיקרא על ידי IE. אתה יכול להשתמש בכלי חיצוני כגון http://www.besttoolbars.net או שאתה יכול לקרוא על IE Extenstions - http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/ext/tutorials/button.asp

 

[הקוסם המעופף]

תודה.

בהתחלה רציתי לכתוב רק קוד אחד, אבל בסופו של דבר המשכתי. ותודה גם על התשובה, שאני יהיה שוב בבית אני ינסה אתזה.