أريد برنامج يحسب العمر

يا اخي دي عملية طرح عادية جدا

أنا طرح :)

وطلع عندي العمر بالأيام ... وحولتها لسنة بالقسمة على 365 ... طيب الكسور وش أسوي فيها .. ما أعرف :(

أبغى البرنامج يقول العمر ... 15 سنة و 3 شهور و 12 يوم و 15 ساعة :)

سلام

كيف حالك اخوي

اتوقع ان الطريقه انك تحصل على التاريخ لليوم

وتتطرح منه اليوم المدخل

مثلا تاريخ اليوم

1-6-2005

وتاريخ ميلادي مثلا 26-12-1982

راح ينقص السنين والشهور والايام من بعض

لكن مثلا خليه يستلف من السنين اذا كان تاريخ اليوم اصغر من تاريخ الميلاد في السنه كما بالمثال بالاف ستيتمنت

2005-1982 = 23

if monthl.txt < monthB.txt

هذا لو قلنا monthBرقم الشهر للبدايه اي سنه الميلاد وو رقم الشهر للنهايه اي تاريخ اليوم monthl وقس على ذلك

ونشيك على الشهر 6<12 لازم نستلف من السنه ونغيرها الى 22

ونضيف سنه للشهر 12+6 = 18

وراح يصير الفرق بالشهور 18-12 = 6 شهور

ونشيك على اليوم 1- 26 1>26 ننقص الشهور بواحد عدد الشهور = 5

ونضيف 30 الى عدد الايام

30+1 =31

والايام يصير 31-26 = 5 ونعرضه

بس المشكله في عدد الايام

لان ما ادري الشهر يكمل ام لا اقصد 29 والا 30 والا 31 مع ان ما لها اهميه تقريبا مش فارقه

مجرد فكره ممكن تجد افضل منها

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

ولا تنسى تعرض لنا برنامجك

تحياتي

و ليه ده كله يمكنك طرح تاريخين من بعض باستخدام علا مة الطرح العادية و لكن تضع الناتج في TimeSpan

و هذا مثال

Dim t1 As DateTime = DateTime.Today
 	 Dim t2 As DateTime = DateTime.Today.AddDays(4).AddHours(2).AddMinutes(45)
 	 Dim t3 As TimeSpan = t2 - t1
 	 MessageBox.Show(t3.ToString)

مشكور اخوي باشا مهندس

بما اني مبتدى ولي محاولاتي بالبرمجه بالفجوال بيسك

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

ماذا تعني هذه العباره

DateTime.Today.AddDays(4).AddHours(2).AddMinutes(45)

وايضا ماهي TimeSpan

هل لنا بشرح لتعم الفائده لاني انترستد الان واعتقد انها راح تختصر مشاوير طويله علي خصوصا في وجود غيرها

   Dim t2 As DateTime = DateTime.Today.AddDays(4).AddHours(2).AddMinutes(45)

هذا السطر فقط اضفته لكي يكون هناك فرق بين الDateTime.Today و التاريخ الثاني حتى لا تكون عملية الطرح ناتجها صفر

فهذا السطر اضاف ساعتان و 45 دقيقة على تاريخ اليوم