03-06-18, 09:26 PM
(آخر تعديل لهذه المشاركة : 04-06-18, 12:18 AM {2} بواسطة issamsaidd.)
شكرا كتير الكم ولكن هناك شى بسيط
Dim Timespn As TimeSpan = Now - Me.DateoffirstvisitDateTimePicker.Value
Dim Year As Integer = (Timespn.TotalDays \ 365.25)
(( MsgBox(Year + Val(AgeTextBox.Text.ToString
Dim Year As Integer = (Timespn.TotalDays \ 365.25)
(( MsgBox(Year + Val(AgeTextBox.Text.ToString
هذا الكود هو ما اريده ولكن القيمة تطبع فى رسالة ولا تتغير اريدها فقط تتغير فى خانة AgeTextBox بدون خروج رسالة
مع العلم قاعده البينات اكسس و age معمول رقم شكرا لكم كثيرا