تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] كيف يمكنني تحويل التقويم من هجري إلى ميلادي والعكس؟؟
#1
بسم الله الرحمن الرحيم

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

لدي مشكلتين اتمنى منكم المساعدة في حلها 

ٍاولا كيف يمكنني التحويل من تقويم ميلادي إلى هجري والعكس؟؟ (من غير التأثر بتقويم الجهاز)
جربت الكود التالي واشتغل كويس في حالة كان تقويم الجهاز هجري لكن اذا قمت بتحويل تقويم الجهاز إلى ميلادي فإنه لا يعترف بالتقويم الهجري الذي عرفته في الكود


PHP كود :
Dim cltAR As New CultureInfo("ar-SA"' التقويم الهجري
        Dim cltEN As New CultureInfo("en-US") ' 
التقويم الميلادي

        
' لعرض تاريخ اليوم بالتقويم الهجري
        MsgBox(Now.ToString("yyyyMMdd", cltAR))

        ' 
لعرض تاريخ اليوم بالتقويم الميلادي
        MsgBox
(Now.ToString("yyyyMMdd"cltEN)) 

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

PHP كود :
       Dim tempDate As DateTime Convert.ToDateTime(TextBox2.Text

PHP كود :
       Dim tempDate As DateTime CDate(TextBox2.Text

أتمنى أن أجد لديكم حل لمشكلاتي وشكرا لكم مقدما
الرد
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله انظر الموضوع التالي 


http://vb4arb.com/vb/showthread.php?tid=...4#pid94654

والله الموفق
  Heart   الرجاء البحث قبل وضع السؤال  Heart

   كل عام وانتم بالف بخير.  
الرد
#3
أشكرك أخي الكريم  sendbad100 

والأكواد اشتغلت معي ممتازة بس باقي التحويل من ميلادي إلى هجري لم يعمل بالشكل الصحيح

PHP كود :
 Dim ar As CultureInfo = New CultureInfo("ar-SA")
 
       Thread.CurrentThread.CurrentCulture ar

        ar
.DateTimeFormat.Calendar = New HijriCalendar
        ar
.NumberFormat.DigitSubstitution DigitShapes.NativeNational
        Dim tempDate 
As DateTime Convert.ToDateTime("01/02/2017")

 
       TextBox2.Text Format(tempDate"dd/MM/yyyy"

هذا الكود اللي المفروض انه يحول من ميلادي إلى هجري مع العلم ان التحويل من هجري إلى ميلادي شغال كويس
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن تحويل هذا الكود للسى شارب لو سمحتم ابو روضة 9 209 06-10-18, 02:07 AM
آخر رد: ابو روضة
  [VB.NET] استفسار :- Speech To Text تحويل الصوت الى حروف dubai.eig 1 102 05-10-18, 07:08 PM
آخر رد: alsouf
  تحويل كود من c# إلى vb.net sads 17 540 25-08-18, 08:22 AM
آخر رد: elgokr
  [VB.NET] استفسار :- SlimDX بعد تحويل المشروع الى ملف EXE dubai.eig 7 176 15-08-18, 09:51 PM
آخر رد: elgokr
  [VB.NET] تحويل كود الفجوال بيسيك 6 الى الدوت نت (كود التنقل بين مصفوفة تكست بوكس) larbihamri 6 197 05-08-18, 07:26 PM
آخر رد: larbihamri
  تحويل النصوص الى PDF معاذ العامري 4 221 30-07-18, 12:25 PM
آخر رد: DOX.1
  [VB.NET] كيف يمكنني ان اسند نتيجة البحث الى التكست بوكس larbihamri 9 292 29-07-18, 07:18 PM
آخر رد: larbihamri
  تحويل الامتار الي اسهم hatem555 4 4,721 24-07-18, 03:19 PM
آخر رد: Done
  كود تحويل ما في ListBox ل TextBox YousefOkasha 6 249 24-07-18, 02:49 PM
آخر رد: معاذ العامري
  [سؤال] كيفية تحويل مشروع من c# الى vb.net alims 5 215 12-07-18, 10:53 PM
آخر رد: elgokr

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


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