PDA

View Full Version : كيف اضيف الصوت لفورم في الفيجوال بيسك


SL500
06-12-2003, 05:45 PM
السلام عليكم
اخواني شرح للسؤال اللي فوق ........المطلوب طريقة لاضافة الصوت الى برنامج تعليمي..بحيث اجعل هناك زر خاص اذا اراد المستخدم سماع شرح صوتي للدرس...
فهل يمكن ذلك بحيث لكل فورم او شاشة يكون هناك ملف صوتي خاص بها وما هي ازارير التحكم التي سوف تظر
* هل يمكن ان يكون هناك خلفية صوتية للبرنامج بالاضافة الى وجود الزر الخاص بالشرح الصوتي
الرجاء سرعة الردسواء هنا او على الايميل switty_non@hotmail.com
وسلامتكم

silver
06-12-2003, 08:25 PM
شوفي هذا الموضوع
Playing .WAV Files in Visual Basic (http://msdn.microsoft.com/archive/en-us/dnarvbtips/html/msdn_msdn166.asp)

ممكن يفيدك :)

SL500
07-12-2003, 01:55 AM
:)

SL500
07-12-2003, 05:07 PM
بصراحة الموقع ما اعطاني الاشياء الطلووووووووووووبة
تكفون العووووون
بنت اهلها وييييييييييييييييينك

بنت اهلها
07-12-2003, 05:44 PM
السلام عليكم ورحمة الله وبركاته

ودي اساعدك ياختي لكن ماعرفت المطلوب!
وخبرتي في الفجول بيسك و البرمجه بشكل عام تقريبا ولا شي.
اللي اقدر عليه هو البحث في البيانات و مراجع التشغيل والصيانة.
لكن شوفي هذا الموقع هنا (http://www.geocities.com/smigman.geo/mci/home.html) كنه يعرف عن الموضوع بشكل عام مع انه قديم ولا حدث موقعه من سنتين.

SL500
08-12-2003, 04:55 AM
:)

بطران
08-12-2003, 02:33 PM
إذا كنت تستخدم الفيجول ستديو دوت نت .
فكل ما عليك هو البحث في الـ MSDN لأن الكود جاهز بها .. أنا استخدمته من فترة قريبة ..
في حالة كونها مهيب عندك علمني و أدوره لك ...
تحياتي,بطران


****************
العذر والسموحة قلت لنفسي العجز شين هذا هو الكود
Public Class SoundClass
Declare Auto Function PlaySound Lib "winmm.dll" (ByVal name As String, ByVal hmod As Integer, ByVal flags As Integer) As Integer
Public Const SND_SYNC = &H0 ' play synchronously
Public Const SND_ASYNC = &H1 ' play asynchronously
Public Const SND_FILENAME = &H20000 ' name is file name
Public Const SND_RESOURCE = &H40004 ' name is resource name or atom

Public Sub PlaySoundFile(ByVal filename As String) 'the function that plays the sound
' Plays a sound from filename.
PlaySound(filename, Nothing, SND_FILENAME Or SND_SYNC)
End Sub
End Class

SL500
09-12-2003, 10:00 AM
للرفع

SL500
11-12-2003, 01:23 AM
واي احد يبي مساعدة في الفيجوال بيسك
انا حاضرة باللي اقدر عليه :)