[ابو روضة]

(27-11-19, 11:29 PM)3booody كتب : نعم ممكن عن طريق مكتبة تشغيل ملفات الصوت التي ارفقتها لك بمشروع سابقآ : تشغل مثلآ اذان
نفس فكرة المنبه

---

تفضل اخي عملتك هالطريقة توضيحية
بس حاول تتأكد من قيمة t اذا تتوافق مع الاوقات التي تحملها

كود :

Dim t As String = ""
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       Timer1.Start()
   End Sub

   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       t = TimeOfDay.ToString("h:mm tt")
       Select Case t
           Case ListBox1.Items(0)
               'حان موعد اذان الفجر
           Case ListBox1.Items(1)
               'حان موعد اذان الظهر
           Case ListBox1.Items(2)
               'حان موعد اذان العصر
           Case ListBox1.Items(3)
               'حان موعد اذان المغرب
           Case ListBox1.Items(4)
               'حان موعد اذان العشاء
       End Select
   End Sub

ربنا يجزيك كل الخيرات والبركات أخى الغالى...