[silverlight]

كود :

       ' تحديد تاريخ بداية الخدمة
       Dim serviceStarted As DateTime = DateTimePicker1.Value
       ' تحديد تاريخ نهاية الخدمة
       Dim serviceEnd As DateTime = DateTimePicker2.Value
       ' حساب عدد أيام الخدمة
       Dim days As Integer = GetTotalWorkingDays(serviceStarted, serviceEnd)
       ' اقسم عدد الايام علي 30 فتتحصل علي عدد شهور الخخدمة أو اقسم عدد الأيام علي 365 فتحصل علي عدد سنوات الخدمة