学习VB.NET时,你可能会遇到VB.NET日期类型问题,这里将介绍VB.NET日期类型问题的解决方法,在这里拿出来和大家分享一下。
虽然手工操纵VB.NET日期类型值已经成为开发人员的公共习惯,但是这并不是一个好主意,因为结果很少是正确的日期值。无论什么时候,当你试图用自己的计算路径进行日期值的加减运算时,都有可能产生一个漏洞,因为我们很难检查代码的所有可能输出结果。然而使用恰当的.NET对象与方法是可以确保得到正确的结果的。
正如在列表A中所看到的,我们可以使用Date对象提供的简单操作来进行VB.NET日期类型值的加减运算。在本例中,我们定义了Date对象的实例dtNowand,并设定值为当前日期。使用下面Date对象的方法来处理日期:AddYears, AddMonths, AddDays, AddHours, AddMinutes, AddSeconds, and AddMilliseconds。
对每个方法,我们分别指定进行加法运算的年、月或日的值。减法运算可以通过传递给方法一个负值来来实现。注意这些方法决不会返回一个非法的日期,而手工操作不能保证这样的结果。
- Private Sub AddDateTime()
- Dim dtNow As Date = Now()
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddYears(20)
- MsgBox(dtNow) the Date object provides for simple manipulation that
- allows you to add and subtract date/time values in VB.NET.
- dtNowdtNow = dtNow.AddMonths(10)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddDays(3)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddHours(5)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddMinutes(2)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddSeconds(6)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddMilliseconds(4)
- MsgBox(dtNow)
- dtNowdtNow = dtNow.AddYears(-2)
- MsgBox(dtNow)
- End Sub
【编辑推荐】