منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : برنامج اظهار التاريخ هجري و الميلادي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
بسم الله الرحمن الرحيم

الاخوه الزملاء

مشروعي هو لتحويل التاريخ من الميلادي الى الهجري فقط ، اريد اطور البرنامج ويعمل بالتبديل بين التاريخين بحيث اختار اي تاريخ سواً ميلادي او هجري وهو يقوم بتحويله بشكل افضل كما في الصوره اتمنى المشاركه والتفاعل مع الموضوع لاانه سيعم بالفائدة على الجميع وشكراً .
اين المبدعين اين هم هل عرفتم
بس كدخ من عيني الاثنين نعدل المثال
ان شاء الله كره يكون عندك علشان دلوقتي بصور الدرس الثامن
مع السلامة
ده وعد مني
أدخل ال هد الرابط وجدته في المنتدى
في ما تريد
http://vb4arb.com/vb/thread-259.html
الرابط الذي وضعته موجود وقد اطلعت عليه والبرنامج المدرج موجود ضمن مشاركتي

اريد اطور البرنامج بشكل افضل كما في الصوره بالضبط هل هناك امكانية اكون شاكراً لك .

شكراً لك
أم ممكن أوي تعملوا
انا هعمل المثال لانت عايزوا و اديهولك انتظرني
اكون شاكر لك لو يكون البرنامج بنفس التصميم المرفق وشكراً لك
السلام عليكم

تفضل اخي اتمني ان يكون ماتطلبه
(28-01-17, 08:44 PM)sun_sweet كتب : [ -> ]السلام عليكم

تفضل اخي اتمني ان يكون ماتطلبه
جميل جدا بس هل فى امكانية ان اعرض التاريخ الهجري في DateTimePicker
لا يوجد دعم مباشر لعرض التاريخ الهجري في DateTimePicker في Windows Forms

ولكن يمكنك استخدام طرق بديلة لتحقيق ذلك، مثل استخدام DateTimePicker لعرض التقويم الميلادي، وتحويل التاريخ المختار إلى هجري وعرضه في مربع نص أو تسمية.

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

أضف DateTimePicker لاختيار التاريخ الميلادي (dtpGregorian).
أضف Button لتنفيذ التحويل (btnConvertToHijri).
أضف TextBox أو Label لعرض التاريخ الهجري (txtHijri).
إليك الكود لتحقيق ذلك:

PHP كود :
Imports System.Globalization

Private Sub btnConvertToHijri_Click(sender As ObjectAs EventArgsHandles btnConvertToHijri.Click
    Try
        
' الحصول على التاريخ الميلادي من DateTimePicker
        Dim gregorianDate As DateTime = dtpGregorian.Value
        
        ' 
إنشاء كائن HijriCalendar
        Dim hijriCalendar 
As New HijriCalendar()
 
       
        
' الحصول على السنة والشهر واليوم الهجري
        Dim hijriYear As Integer = hijriCalendar.GetYear(gregorianDate)
        Dim hijriMonth As Integer = hijriCalendar.GetMonth(gregorianDate)
        Dim hijriDay As Integer = hijriCalendar.GetDayOfMonth(gregorianDate)
        
        ' 
عرض التاريخ الهجري في مربع النص أو التسمية
        txtHijri
.Text = $"{hijriDay}/{hijriMonth}/{hijriYear}"
 
   Catch ex As Exception
        MessageBox
.Show("حدث خطأ أثناء تحويل التاريخ: " ex.Message)
 
   End Try
End Sub 

الخطوات:
أضف DateTimePicker وسميه dtpGregorian.
أضف Button وسميه btnConvertToHijri.
أضف TextBox أو Label وسميه txtHijri.
هذا الكود يقوم بتحويل التاريخ المختار في DateTimePicker من الميلادي إلى الهجري ويعرضه في TextBox أو Label.