[smiley]

السلام عليكم ورحمة الله :
لدي مثال مرفق بسيط :
به حقل تاريخ ميلاد
وحقل العمر
المطلوب بعد كتابة تاريخ الميلاد وعند الضغط على حقل العمر يتم كتابة العمر المفروض رقما وذلك بطرح تاريخ الميلاد من تاريخ الحالي للجهاز .
هذا كل مافي الامر
وشكرا
--------
المثال مرفق .

[smiley]

up...........

[Sajad]

السلام عليكم

تفضل:

PHP كود :

Dim t1 As DateTime = DateTime.Parse(TextBox2.Text)

        Dim s As Integer = Date.Now.Year - t1.Year

        TextBox3.Text = s.ToString() 


[محمود اكرم]

Dim DOB As New Date


'(1992/ 11/ 9)
DOB = InputBox("", "")
Dim Years As Integer = DateDiff(DateInterval.Year, DOB, Now)
Dim Moths As Integer = DateDiff(DateInterval.Month, DOB, Now) Mod 12
MsgBox(Years & "Years" & Moths & "Months")