텍스트 상자에 년, 월 또는 일을 계산하는 datetimepicker

Question

내 질문은 어떻게 다른 텍스트 상자에서 datetimepicker를 사용하여 나이를 계산할 수 있습니까?

사용자가 오늘 2014년 11월 6일입니다 가정 할 2014년 10월 6일 날짜를 선택합니다 경우 텍스트 상자는 사용자가 2014년 2월 3일을 선택합니다 경우에 "1 일" 또는, txtbox 보여 "3개월"해야

이 표시되어야합니다 나이 계산에 대한 코드입니다.

Private Sub BirthDate_ValueChanged(ByVal sender As System.Object, 
     ByVal e As System.EventArgs) Handles BirthDate.ValueChanged 
    txtAge.Text = Fix((DateDiff(DateInterval.Day, BirthDate.Value, Now.Date))/365) & " years" 
End Sub 

미리 감사드립니다.

Answer 1

체크 아웃 참조 DateDiff 사양 : http://msdn.microsoft.com/en-us/library/b5xbyt6f%28v=vs.90%29.aspx

이미 그것을 사용하고 있지만, 몇 년을 원한다면, 당신은 365에 의해 일을 분할 할 필요가 없습니다를, 당신은 DateInterval.Year를 사용할 수 있습니다.

다른 시간 간격에도 같은 것을 적용 할 수 있습니다. 각 시간 간격을 사용할 때 매개 변수를 설정해야합니다. 예를 들어

(의사) :

if DateDiff(DateInterval.Day, Birthdate.Value, Now.Date) < 30 
print DateDiff(DateInterval.Day, Birthdate.Value, Now.Date) 

elseif 29 < DateDiff(DateInterval.Day, Birthdate.Value, Now.Date) < 365 
print DateDiff(DateInterval.Month, Birthdate.Value, Now.Date) 

elseif DateDiff(DateInterval.Day, Birthdate.Value, Now.Date) > 365 
print DateDiff(DateInterval.Year, Birthdate.Value, Now.Date) 

내가 희망이 도움이!