Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Dim myAge AS Integer = DateTime.Now.year - BirthDate.year
- If Birthdate.month < DateTime.Now.Month _
- OrElse BirthDate.Month = DateTime.Now.Month AndAlso Birthdate.Day < DateTime.Now.Day Then
- MyAge -= 1
- END IF
Add Comment
Please, Sign In to add comment
