منتدى أحلـــى كـــلام
عزيزى الزائر

كونك زائر غير مسجل

* سيتم عرض اعلانات لك، هذه الاعلانات لا تظهر للاعظاء.
* لن تتمكن من مشاهدة بعض محتويات مواضيعنا.

ندعوك للتسجيل بأقل من دقيقة
* لتتمكن من مشاهدة كافة محتويات المواضيع التى ترغب فى قرآئتها .
* وقف عرض الاعلانات.

SiteAdmin

انضم إلى المنتدى ، فالأمر سريع وسهل

منتدى أحلـــى كـــلام
عزيزى الزائر

كونك زائر غير مسجل

* سيتم عرض اعلانات لك، هذه الاعلانات لا تظهر للاعظاء.
* لن تتمكن من مشاهدة بعض محتويات مواضيعنا.

ندعوك للتسجيل بأقل من دقيقة
* لتتمكن من مشاهدة كافة محتويات المواضيع التى ترغب فى قرآئتها .
* وقف عرض الاعلانات.

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

أحلى كلام فى كل الكلام ، كمبيوتر ، دعم فنى ، اسلاميات ، اعجاز علمى ، قصص وروايات ، شعر ، ادب ، صور نادرة ، كتب نادرة وممنوعه ، المرأة ، الصحة ، الطفل ، الموبايل

Online Job for All

دالة طرح تواريخ وحساب العمر بناء على تاريخ الميلاد

منتدى أحلـــى كـــلام :: قســـــم الكمبيوتر والانترنت :: قسم لغات البرمجة

اذهب الى الأسفل

دالة طرح تواريخ وحساب العمر بناء على تاريخ الميلاد Empty دالة طرح تواريخ وحساب العمر بناء على تاريخ الميلاد

مُساهمة من طرف 123 الثلاثاء يوليو 06, 2010 1:28 pm

دالة طرح تاريخيين من بعضهم وحساب السن اعتمادا على تاريخ الميلاد

سيتم اضافة مربع نص لادخال تاريخ الميلاد ثم تحويل قيمتة الى تاريخ وطرحة من تاريخ اليوم


الكود:


'Convert text to Date
Dim Birth as Date
Birth = DateValue(txtDOB)

'Calculate age
Dim Age as Integer
Age = Int(DateDiff("D", Birth, Now) / 365.25

123
عضو نشط
عضو نشط

عدد المساهمات : 34
نقاط : 164
تقييم العضو : 0
تاريخ التسجيل : 15/06/2010

الرجوع الى أعلى الصفحة اذهب الى الأسفل

الرجوع الى أعلى الصفحة

- مواضيع مماثلة

منتدى أحلـــى كـــلام :: قســـــم الكمبيوتر والانترنت :: قسم لغات البرمجة

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى