الاخوة الكرام
السلام عليكم
لدي برنامج و اود اظهار التاريخ الهجري في تكست بوكس فهل من يساعدني بذلك اي يصبح التعامل في البرنامج مع التاريخ الهجري
خلاص عرف الاجابة
و هي باستخدام الكود
VBA.Calendar = vbCalHijri
لتحويل البرنامج للتاريخ الهجري
السّلام عليكم و رحمة الله و بركاته
الحمد لله الذي بنعمته تتم الصالحات
الحمد لله أخي ALLOBAED أنّك وُفّقت للإجابة
هل لك لو تكرّمت بوضع الكود للإستفادة
بارك الله فيك و لك مقدّمًا
تحياتي
أهلا إخواني الكرام , أخي عبدالعزيز , هذه الطريقة لإظهار التاريخ الهجري يجب أولا تغيير التقويم ثم عرض التاريخ بالطريقة العادية :
PHP كود :
Calendar = vbCalHijri
Text1.Text = Date
السّلام عليكم و رحمة الله و بركاته
كفيت و وفيت أخي و أستاذي الحبيب الغالي " أحمد منصور "
لا يمكن بأي حال من الأحوال تناسي أو تجاهل أفضالك علينا
أدعو الله أن يعوّضك عن كل حرف تعلّمنا إيّاه بمليون حسنة إن شاء الله
بارك الله فيك و رزقك من حيث لا تحتسب
خالص مودّتي
السلام عليكم
بعد الشكر للاخ احمد ولزيادة الفائدة
PHP كود :
Private Sub Command1_Click()
VBA.Calendar = 1
Print Date
End Sub
حيث :
vbCalGreg = (التقويم الميلادي) = 0
vbCalHijri = (التقويم الهجري) = 1
ولاظهار التاريخ مع اسم اليوم والشهر
PHP كود :
Private Sub Command1_Click()
VBA.Calendar = vbCalHijri
Print Format(Now, "(dddd) (yyyy/mmm/dd)")
End Sub
اتمني التوفيق للجميع .
جزاكم الله جميعا ( عبد العزيز البسكري و أحمد منصور و AL_BRNS ) خير الجزاء و وفقكم في دينكم و دنياكم اجمعين على هذه الردود الطيبة
و ليس لي اي اضافة اخرة