الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف اصدر صوت متل صوت MsgBox

مغلق
بدأه ولد إبن جرير في 22 أغسطس 2006 · 4 رد · 537 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم و الصلاة و السلام على أشرف الأنبياء و المرسلين و بعد

إخواني الكرام أردت أن أستبدل الشكل التقليدي للرسائل في الفيجوال بيسك إلى شكل أنا من يحدده وقد قمت بالقيام بدلك كما بالصورة:

47a2c.jpg

لكن المشكلة هو أنني لا أعرف كيف أصدر الصوت الخاص بالنوع vbExclamation في الرسائل

لدا المرجوا يا أفاضل أن تفيدوني و ياريت لو كان كود كل أصوات أنواع الرسائل تحطوه و أكون شاكر لكم

و السلام عليكم

تم تعديل هذه المشاركة بواسطة ولد إبن جرير في 22 أغسطس 2006 في 13:02

#2

عندك كل الأصوات في مجلد Media

[Drive]:\WINDOWS\Media

الأصوات من نوع Wav وبالتالي يمكنك استخدام دالة sndPlaySound

#3

السلام عليكم

أخي الكريم بارك الله فيك

لكن ممكن تعطيني الكود كاملا و أكون شاكرا

والسلام عليكم

تم تعديل هذه المشاركة بواسطة ولد إبن جرير في 22 أغسطس 2006 في 15:07

#4

أعتقد أنك استخدمت دالة sndPlaySound من قبل ..

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Const SND_ASYNC = &H1
Private Sub Command1_Click()
 sndPlaySound Environ$("WINDIR") & "\Media\Windows XP Exclamation.wav", SND_ASYNC
End Sub
#5

السلام عليكم

تسلم يا طيب و جاري تجربة الكود

الله يخليك

و السلام عليكم

هذا الموضوع مغلق.

مواضيع مشابهة