09-10-16, 02:22 AM
(08-10-16, 10:15 AM)VBBegin كتب :![]()
كود :
Dim AGE As Integer
(AGE = DateDiff(DateInterval.Year, DateTimePicker1.Value, DateTimePicker2.Value
" سنة" & ()AGE.ToString & ":العمر"= LableAge.Text
Mish3l
