الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف انسق التاريخ الهجري

مغلق
بدأه الباشق1 في 24 أبريل 2005 · 17 رد · 1,133 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

اخوتي كيف انسق التاريخ الهجري مثل 1-1-1426هـ

ويتحمل تلقائي ويضيف حرف هـ تلقائي مثل كذا 1-1-1426هـ

المطلوب كتابت التاريخ في اي تجه يتحول تلقائي

مثل كتبته كذا 1426-1-1هـ يتحول الى 1-1-1426هـ مباشره او بعد الخروج اهم شي يتحول الى الصيغة الصحيحه وهي 1-1-1426هـ

لو سمحتم

تم تعديل هذه المشاركة بواسطة الباشق1 في 24 أبريل 2005 في 22:25

#2

أستخدم ( Format ) ..

Text1.Text = Format(Date,"dd-mm-yyyy" & "هـ")

وغير ما يلزم تغيره ..

#3

الف كشررررررررررررررررررررررر

لك اخي الكريم سوف اجربها ورد عليك

#4

اخي الكريم مانجح معي هذه الكود

عندما انتقل الى حقل التاريخ يظهر التاريخ تلقائي وابي اغيره لا يمكن

انا قصدي بالتلقائي اتنسيق فقط ماهو التاريخ ياضاف تلقائي لو سمحت

ابي عندما اكتب التاريخ يعدل التنسيق فقط

بدون عنوان.bmp

#5

جرب هذا :

Text1.Text = Format(Text1.Text,"dd-mm-yyyy" & "هـ")
#6

الف شكر لك اخي مره اخرى

تمام اخي بس عندما اضيف رقم اخر يعطيني تاريخ تلقائي ولا استطيع التعدلي عليه مثل 1-1-1999

هـ

#7

طيب أنت كيف تكتب التاريخ .. وهل تكتبه في TextBox أو في أداة أخرى ..

ياريت توضح كيف تكتب التاريخ على الأداة ..

ثاني شي التحويل اللي يحدث على التاريخ في أي حدث ..

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

#8

السلام

اخي ارفق لك هذا البرنامج الذي اعمل عليه

ممكن تعدل عليه التاريخ

و ممكن تعدلي على الرقم

البحث عن التكريري

هو الان يبحث بس عن تكرير الرقم والمطلوب عن الرقم والتاريخ

لوممكن يعني اذا تطابقاء يعطيني الرقم مكررر واذا لم يتطابق يسجل عادي

Export.rar

#9

أخي العزيز ..

برنامجك ما اشتغل معي تمام .. وأنا مش عارف بالضبط إيش المشكلة اللي عندك ..

على العموم .. عدلت لك على التاريخ فقط ..

Export.zip

#10

الف شكر لك اخي

طلب اني عندما اخدل رقم الوارد وتاريخه ان مايتكرر في السنه اكثر من مره

فقط ام اذا فيه سنه الي بعدها او قبلها لو كان الرقم والتاريخ متشابهين مافيه مشكله

بس في نفس السنه مايتكرر التاريخ والرقم اكثر من مره

#11

هذا المثال شغال تمام 100%

الف شكر لك اخي الف شكر لك اخي الف شكر لك اخي

المطلوب

طلب اني عندما اخدل رقم الوارد وتاريخه ان مايتكرر في السنه اكثر من مره

فقط ام اذا فيه سنه الي بعدها او قبلها لو كان الرقم والتاريخ متشابهين مافيه مشكله

بس في نفس السنه مايتكرر التاريخ والرقم اكثر من مره

Export.rar

#12

وينكم ياشباب

#13

تم التحميل .. وسوف اراجع برنامجك وأعطيك الخبر

#14

الله يستلك عليك

ويعطيك الف عافيه على متابعتك

#15

قلت في البداية

الباشق1 كتب:
طلب اني عندما اخدل رقم الوارد وتاريخه ان مايتكرر في السنه اكثر من مره فقط

وبعدين قلت

الباشق1 كتب:
ام اذا فيه سنه الي بعدها او قبلها لو كان الرقم والتاريخ متشابهين مافيه مشكله

كيف إذا كان سنة قبلها أو بعدها .. والرقم والتاريخ متشابهين .. !!!

ياريت توضح أكثر .. ولو ترفق مثال على كلامك يكون أفضل .

#16

اخي الكريم

المقصود مشتبهين ماهو مشكله المقصود

أن اذا كان الرقم والتاريخ الي بالسنة التي قبل هذه مشابه لتاريخ والرقم الي في السنه الي بعدها مايتعارض معه

مثل

رقم الوارد 10 وتاريخ 20/2/1425هـ اوكي

رقم الوادر 10 وتاريخ 20/2/1426هـ اوكي

*******************************************************

اما فيه السنه نفسها يعطيني رساله ان التاريخ والرقم موجودين

اما في السنة التي قبلها لا يتعارض معه

*******************************************************

هذا المقصود أن ما ياتعرض معه

الملطوب ان مايتكرر رقمين وتاريخين في السنه الوحده فقط

#17

بما إن برنامجك يتعامل مع التاريخ فالأفضل أنك تخصص خانة في قاعدة البيانات تخزن التاريخ وتكون بنوع ( Date ) وذلك لتسهيل عملية الشرط عند الإضافة ،

وعليك بعد ذلك تضع عملية شرط عند الإضافة وتقارن رقم الوارد ووالتاريخ ، وهناك عدة دوال ممكن أن تستفيد منها وهي كالتالي :-

CDate(Text1.Text)

وتفيدك في التحويل من متغير نصي إلى متغير تاريخ.

Year(Date)

تفيدك في إرجاع السنة لتاريخ معين

وهناك دوال كثيرة للتعامل مع التاريخ تجدها عند فتحك لل ( Object Browser ) تحت الموديول ( DateTime ) .

المعذرة منك لأني لا يوجد لدي الوقت الكافي للتعديل على برنامجك .. ولكن إذا واجهتك أي صعوبات لا تتردد في السؤال .

أخوك شوقي.

#18

الف شكر لك اخي

بس اخي مافيه حل لبرنامج من غير اضافة حقل جديد

او انت تكفى عدلي عليه الذي انت تقول

والرسله لي

هذا الموضوع مغلق.

مواضيع مشابهة