منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] هل يوجد اكواد صوت مثل Beep للتنبيه - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] هل يوجد اكواد صوت مثل Beep للتنبيه (/showthread.php?tid=21743)

هل يوجد اكواد صوت مثل Beep للتنبيه - hglogtd - 17-09-17

السلام عليكم 


هل يوجد اصوات للتنبيه مثل تنبيه Beep 

واذا لم يوجد ماهي الطريقة لعمل مثل هذه التنبيهات وفقكم الله

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - سعود الشامان - 17-09-17

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

كود المشروع كامل


كود :
Imports System.Media
Public Class Form1
   
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       SystemSounds.Beep.Play()
   End Sub
End Class

المثال في المرفقات

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - سعود الشامان - 17-09-17

بطريقة أخرى

كود :
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       My.Computer.Audio.PlaySystemSound(System.Media.SystemSounds.Asterisk)
   End Sub

End Class


RE: هل يوجد اكواد صوت مثل Beep للتنبيه - hglogtd - 18-09-17

PHP كود :
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Beep)
    End Sub
 
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Asterisk)
    End Sub
 
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Hand)
    End Sub
 
 
    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        My.Computer.Audio.PlaySystemSound(Media.SystemSounds.Exclamation)
    End Sub 
شكرا لك ويعطيك العافيه

ممتاز وبارك الله فيك طبعاً لقيت اكواد اخرى

ولكن هل يوجد غيرها او هي محدده

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - أبو نوره - 18-09-17

مرحبا اخى

كثير من التطبيقات تستخدم ملفات صوتيه يتم ارفاقها مع التطبيق ويتم تشغيلها باستخدام اداه خاصه بالفيجوال اسمها WindowsMediaPlayer تشبه الى حد كبير الميديابلاير الخاص بالويندوز

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - hglogtd - 18-09-17

يعطيك العافيه وشكرا لك اخي

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - سعود الشامان - 18-09-17

إضافة بناء على ما ذكره اخوي الحبيب ابو نوره

شوف ه الفيديو


https://www.youtube.com/watch?v=Z2049v4Dfhg

مع عمل بعض التعديلات

- إخفاء لاداة WindowsMediaPlayer

- الملفات الصوتية تستطيع وضعهم في Resources أو فتحهم من الجهاز

RE: هل يوجد اكواد صوت مثل Beep للتنبيه - hglogtd - 20-09-17

شكرا لك ويعطيك العافيه استفدت منكم الله يحفظكم