تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ساعدني في ايجاد كود بسيط .. اخراج عدد السنوات التي مضت
#1
السلام عليكم ورحمة الله وبركاته ..

كيفكم .؟ :p

عندي مشروع فيله تكست بوكس هذاا التكست بوكس 1 باحط فيه تاريخ بالهجري .. إلى الان تمام صح ..Wink

طيب باسوي تكست بوكس 2 يحسبلي عدد سنوات اللي مضت منذ ذاك التاريخ اللي كتبته في تكست بوكس 1 Big Grin

كيف .. :confused: :confused:

مع المعلومية التاريخ بالهجري Wink
الرد }}}
تم الشكر بواسطة:
#2
محد عنده خلفية عن الموضووووع ..
ارجوكم موضوع ضروري
الرد }}}
تم الشكر بواسطة:
#3
اتمنى انك تقصد هذا

حمل من المرفقات


الملفات المرفقة
.rar   WindowsApplication3.rar (الحجم : 60.55 ك ب / التحميلات : 36)
الرد }}}
تم الشكر بواسطة:
#4
يعطيك العافية ما قصررررت ..

انا اللي ابسويه بحسب خدمة الموظف في الشركة

يعني هو اتوظف في تاريخ 15/5/1434 هـ

يعطيني كم مدة خدمته ..

إن شاءالله وضحت الصورة
الرد }}}
تم الشكر بواسطة:
#5
يعطيك المدة ب السنين ولا ب الايام ؟
الرد }}}
تم الشكر بواسطة:
#6
بالسنييين ..
اشكرك على تفاعلك
الرد }}}
تم الشكر بواسطة:
#7
تفضل اخى حمل من المرفقات


الملفات المرفقة
.rar   WindowsApplication6.rar (الحجم : 50.18 ك ب / التحميلات : 39)
الرد }}}
تم الشكر بواسطة:
#8
اشكرك من كل قلبي بس لو حاجة وحدها تعدلها ..

تخلي التاريخ الحالي هو تاريخ اليوم

يعني كل يوم يتغير التاريخ تلقائي كل يوم بيومه ..
الرد }}}
تم الشكر بواسطة:
#9
الف شكر لك يا just.coder
انحلت المشكلة ..
صنعت كود بسيط بسماعدتك طبعا ,,

اللي هوا ..

كود :
Dim c As CultureInfo
        c = New CultureInfo("ar-sa")
        Thread.CurrentThread.CurrentCulture = c
        Dim Split() As String = TextBox1.Text.Split("/")

        Dim t1 As String = Year(Now)
        Dim t2 As String = Split(2)
        Dim r As Long = t1 - t2

        TextBox3.Text = r

مع اضافة
للتحويل الى التاريخ الهجري

كود :
Imports System.Globalization
Imports System.Threading

اذا عندك اي ملاحظة عليه ..



شكرررررا
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال بسيط يا احبتى فى الله خالد كامل1 4 314 07-01-24, 12:55 AM
آخر رد: Mujahef
Tongue استفسار بسيط عن كريستال ريبورت waataanys 1 311 30-11-23, 04:44 PM
آخر رد: Taha Okla
Information [VB.NET] حذف كل العناصر التي تاتي بعد عنصر الذي احدده listbox mervandz 3 287 10-11-23, 07:12 PM
آخر رد: justforit
  اريد اضافة متغيراخر داخل Listbox1 احتاج تعديل بسيط moh61 0 349 05-08-23, 02:29 PM
آخر رد: moh61
  مثال بسيط لربط قواعد mySql مع Vb.net atefkhalf2004 2 396 17-04-23, 01:03 AM
آخر رد: atefkhalf2004
  قاعدة بيانات مع ادراج الصور رائعة جدا مع خطأ بسيط .. مساعدة Tajaldeen 0 397 21-12-22, 07:11 AM
آخر رد: Tajaldeen
  حذف الصفوف التي تم عليها وضع تشيك بكس محمد خيري 6 626 12-11-22, 07:03 PM
آخر رد: ali_ahmed12
  كيف اجعل Autoscroll هي التي تزيد عدد الصفوف في عرض البيانات عبدالكريم برشدان 1 625 07-08-22, 02:55 PM
آخر رد: asmarsou
  [سؤال] أرجو المساعدة سؤال بسيط dr.programming 9 1,281 10-06-22, 11:30 PM
آخر رد: سعود
  [سؤال] تعديل كود بسيط للبحث عن ملفات ابو جمال 5 1,537 11-05-22, 05:47 PM
آخر رد: ابو جمال

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


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