Question

我是一名VB.NET初学者，我想问一下如果只在表格的文本框中输入出生年份，人们可以如何计算一个人的年龄。我应该使用当前年份减去出生年份，但我没有真正的代码。这就是问题：在一个表单中有一个名为txtdob的文本框，用户需要输入他/她的出生年份。我需要一个代码来确定使用当前年份和出生年份的用户年龄。

Answer 1

使用 TimeSpan ..现在将您的日期减去..

Dim dBirth as Date
Dim nDiff as TimeSpan

dBirth = ........  ' you fill with yours

nDiff = Now.Substract(dBirth)

Msgbox( format(nDiff.Days/365) ) '--------> will show the age ..

Answer 2

使用Integer.Parse或Integer.TryParse，然后从Date.Now计算：

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

Answer 3

没有测试过这个，但它应该让你去...

yyyy是出生年....

now.subtract(cdate("0/0/yyyy")).totalyears

干杯

Answer 4

查看DateDiff函数。它告诉您两个日期之间的区别，并且您可以将DateInterval指定为Year，例如

Dim difference As Int = DateDiff(DateInterval.Year, dateOfBirth, currentDate)

链接到资源：http://msdn.microsoft.com/en-us/library/b5xbyt6f(v=vs.80).aspx

使用当前年份的年龄计算

4 个答案: