تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود- حساب مواقيت الصلاة Prayer Times في الدوت نت 2008 و 2005
#1
كاتب الموضوع : silverlight

الأخوة الأفاضل

في المرفقات ستجدون كلاس يمكن استخدامه لحساب مواقيت الصلاة Prayer Times

الكود المستخدم مع الفيجوال 2008 يختلف قليلا عن الكود المستخدم مع نسخة الفيجوال 2005 لذلك ستجدون نسختان من الكود أحدهما للإستخدام مع الفيجوال 2008 والأخري للإستخدام مع نسخة الفيجوال 2005 وعليك ان تختار من بينهما ما يناسبك

وهذه هي طريقة بسيطة لكيفية الاستخدام Implementation في الفيجوال 2008 وايضا في الفيجوال 2005


كود :
Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

' Calculate Prayer Time
' Fajr, Sunrise, Dhuhr, Asr, Sunset, Maghrib, Isha

Dim pt As New PrayerTimes()
pt.setCalculationMethod(PrayerTimes.Methods.Egypt)

Dim pTimes As String() = pt.getPrayerTimes(DateTime.Now, 30.01R, 31.14R, 3)


Label1.Text = "Fajr"
Label2.Text = "Sunrise"
Label3.Text = "Dhuhr"
Label4.Text = "Asr"
Label5.Text = "Sunset"
Label6.Text = "Maghrib"
Label7.Text = "Isha"


Label8.Text = pTimes(0) ' Fajr
Label9.Text = pTimes(1) ' Sunrise
Label10.Text = pTimes(2) ' Dhuhr
Label11.Text = pTimes(3) ' Asr
Label12.Text = pTimes(4) ' Sunset
Label13.Text = pTimes(5) ' Maghrib
Label14.Text = pTimes(6) ' Isha

End Sub
End Class

أتمني الأن أن نري إبداعكم في إنتاج برامج كثيرة عن الصلاة

بالتوفيق
أخوكم عمر


الملفات المرفقة
.rar   Prayers2005.rar (الحجم : 69.99 ك ب / التحميلات : 148)
.rar   Prayers2008.rar (الحجم : 81.36 ك ب / التحميلات : 290)
}}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] اريد كود بالفيجوال بيسك 2008 يقراء سريال المازربورد nabil.1710 5 625 13-06-16, 12:16 AM
آخر رد: محمد سالم المحترف
  درس: كيفية حساب عدد الأسطر في نص المبرمج الطموح vb6 4 1,622 04-08-15, 12:45 AM
آخر رد: العواد الصغير
  [مقال] تشغيل برمجيات الدوت نت بدون تنصيب النت فروم ويرك m0075 13 4,134 13-02-14, 08:29 PM
آخر رد: Omar Mekkawy
  تفقيط الارقام فى الدوت نت مبرمج أوتار 16 3,737 30-08-13, 01:01 AM
آخر رد: abatenovtch
  حساب قيمة معادلة(اقصد صيغة دون مجاهيل) مكتوبة بالتكست : الجزء الخامس والاخير محمد شريقي 3 909 28-05-13, 01:06 PM
آخر رد: Sajad
  التــعامل مع cmd من خلال الدوت نت مبتدئ في الاحتراف 2 532 24-04-13, 07:58 PM
آخر رد: مبتدئ في الاحتراف
  طلب اكواد فجوال بيسك دوت نت 2008 shgeen 2 643 24-02-13, 06:42 PM
آخر رد: السندباد المصري
  دمج قاعدة بيانات SQL Server 2008 مع المشروع بالـ VBNET snipercoder 3 2,016 12-02-13, 03:39 PM
آخر رد: wael
  معلومة ::: Visual Studio 2005 Automation Samples RaggiTech 1 364 06-10-12, 08:00 PM
آخر رد: RaggiTech
  مقال- أفكار في الدوت نت كبف تصنع ColorPicker RaggiTech 0 438 05-10-12, 06:53 PM
آخر رد: RaggiTech

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم