Dim birthYear As Int32 If Int32.TryParse(txtAge.Text, birthYear) Then Dim age As Int32 = Date.Now.Year - birthYear MessageBox.Show("Your age is: " & age) Else MessageBox.Show("Please enter a valid year of birth") End If
DIM txtYear AS String = "1986" Console.WriteLine(DateTime.Now.Year - txtYear)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)