بحث في هذه المدونة

الاثنين، 8 سبتمبر 2025

اداة عرض التاريخ والوقت وبعض التفاصيل الخاصة بها

 


الأداة عرض التاريخ و الوقت  DateTimePicker

  


 

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

تعريف المتغيرات تم كباقي التعريفات مثلا:

Dim x1 , x2 as DateTime

هنا سيتم تحديد نوع المتغيرات فقط على انها تاريخ ووقت.

وأيضا هذه الأداة تتمتع بمجموعة خصائص خاصة بها أهمها.

الخاصية  Value

هي لعرض الوقت والتاريخ على الأداة، ويمكن أيضا اختيار تاريخ معين.

الخاصية Format

وهي لعمل تنسيق معين على الأداة

فلعرض الوقت فقط نستخدم من قائمتها المنسدلة Time

ولعرض التاريخ الطويل ( كتابة أسماء الشهور ) نستخدم من قائمتها المنسدلة Long

ولعرض التاريخ القصير ( كتابة ارقام الشهور ) نستخدم من قائمتها المنسدلة Short

اما عند استخدامنا من القائمة المنسدلة القيمة Custom فان ما يتم كتابتها على الأداة هو بناء على التنسيقات الأخرى الموجودة على الخاصية CustomFormat.

الخاصية CustomFormat

هذه الخاصية نكتب بها الشهر المطلوب لاخراج التاريخ والوقت

لاخراج السنوات فقط نكتب yyyy

ولاخراج السنوات القصيرة نكتب yy

اما لاخراج الشهور بالتسمية نكتب MMMM

اما لاخراج الشهور بالأرقام نكتب MM

ولاخراج الأيام نكتب dd

لاخراج الساعات hh

لاخراج الدقائق mm

لاخراج الثواني ss

 

امثلة

اخرج اليوم والشهر القصير فقط

MM/dd

اخرج السنة اليوم

YY/dd

اخرج الساعة والدقائق فقط

hh:mm

 

 

امثلة برمجية على الأداة

Dim a,b as DateTime

a=dateTimePicker1.value

b=datetimepicker2.value

 textbox1.text=DateDiff(dateinterval.Month,a,b)

الشرح

في السطر الأول تم تعريف متغيررن من النوع المجال الزمني تاريخ ووقت

السطر الثاني تم وضع فيمة أداة الوقت الأولى في المتغير a

السطر الثالث تم وضع قيمة أداة الوقت الثانية في المتغير b

السطر الرابع لدينا التعبير DateDiff وهو لايجاد الفرق بين اما سنتين او شهرين او أو أسبوعين يومين أو ساعتين او دقيقتين أو ثانيتين. أما التعبير Month فهو هنا لايجاد الفرق بين التاريخ بالشهور وناتج التعبير سيظهر الفارق بين التاريخين بالشهور.

يمكن استخدام بدلا من Month

Year

Month

Week

Day

Howre

Menute

Second

 

يمكن استخدام هذا السطر بدل السطر الرابع لاظافة التاريخ

Textbox1.text=dateAdd(dateInterval.day,26,a)

هنا سيتم إضافة 26   يوم إلى التاريخ الموجود  في المتغير a

ولو غيرنا week بدل day  سيتم إضافة 26 أسبوع إلى التاريخ الموجود في a

 

أيضا بامكاني استخراج السنة او الشهر من تاريخ معين كما في السطر التالي

Textbox1.text=year(a)

هنا قم اظهار السنة فقط من التاريخ الموجود في أداة التاريخ الأولى

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

Textbox1.text=a.day

ويمكن هنا إضافة جمالية للسطر كالتالي

Textbox1.text=a.day.tostring("00")

فسيقوم بعرض اليوم من خانتين

 

وأخيرا لدينا الدالة Now

وهي لاظهار الوقت والتاريخ الحالي

اما اذا اردنا اظهار التاريخ القصير فقط فيتم كالتالي

Textbox1.text=Now.ToShortDateString

 

اما اذا اردنا اظهار التاريخ الطويل فنكتب الكود

Textbox1.text=Now.ToLongDateString

 

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

Textbox1.text=Now.ToLongTimeString

 

 

 

 

 

 

 

 

ليست هناك تعليقات:

إرسال تعليق