Question

我需要确定一个人年满21岁的那一天。我已经尝试了很多不同的方法来做到这一点，我可以得到年龄，一个人出生的那一天但不是他们21岁那天，这个是我目前的代码。是的，这是家庭作业，但我已经花了几个小时，但无法弄明白，

Private Sub btnDetermine_Click(sender As Object, e As EventArgs) Handles btnDetermine.Click
    Dim dob As Date = txtDay.Text
    Dim age, days As Double
    days = DateDiff(DateInterval.Day, dob, Today) / 365
    age = Fix(days)
    txtWeek.Text = age.DayOfWeek.ToString()

End Sub

Answer 1

首先，想一想如何在现实生活中解决这个问题，然后尝试编写一个以同样的方式解决这个问题的程序。

所以，首先，我会通过简单地在他/她的出生日期增加21年来找出受试者21岁生日的哪一天。由于AddYears函数，这在Visual Basic中非常简单。

Dim _21BirthDay = dob.AddYears(21)

然后，我会看一个日历，找出一周中的哪一天。

Dim WeekDayOf_21BirthDay = _21BirthDay.DayOfWeek

然后，我可以使用WeekDayOf_21BirthDay变量来显示用户。

确定某人21岁的那一天

1 个答案: