vb.net从入门到放弃：日期与时间

最简单的入门学习的方法就是看代码

以下代码源于uruseibest博客

定义

        Dim date1, date2 As DateTime
        date1 = Date.Now()  '获得当前本地日期和时间。这里也可以省略Date.，直接用Now()
        date2 = New DateTime(2018, 5, 12, 10, 12, 13) '用指定的年、月、日、小时、分钟和秒初始化 DateTime 
 
        '使用Format将日期时间按照我们的要求输出来
        Console.WriteLine(Format(date1, "yyyy-MM-dd HH:mm:ss"))
        Console.WriteLine(Format(date2, "yyyy年MM月dd日 HH时mm分ss秒"))

计算

        Dim date1, date2 As DateTime
        date1 = Date.Now()  '获得当前本地日期和时间。这里也可以省略Date.，直接用Now()
        date2 = New DateTime(2018, 5, 12, 10, 12, 13) '用指定的年、月、日、小时、分钟和秒初始化 DateTime 
 
        '相差月份
        Dim diffMonth As Integer
        diffMonth = (date2.Year - date1.Year) * 12 + (date2.Month - date1.Month)
 
        Console.WriteLine("相差月份：{0}", diffMonth)

        Dim date1, date2 As DateTime
        date1 = Date.Now()  '获得当前本地日期和时间。这里也可以省略Date.，直接用Now()
        date2 = New DateTime(2018, 5, 12, 10, 12, 13) '用指定的年、月、日、小时、分钟和秒初始化 DateTime 
 
        Dim tspan As TimeSpan
        tspan = date2.Subtract(date1)
        Console.WriteLine(tspan.Hours)
        Console.WriteLine(tspan.TotalHours)

    Sub Main()
        Dim date1, date2 As DateTime
        date1 = Date.Now()
        date2 = New DateTime(2018, 5, 12, 10, 12, 13)
 
        Console.WriteLine("相差天数：" & (date2 - date1).TotalDays)
        Console.WriteLine("相差小时：" & (date2 - date1).TotalHours)
        Console.WriteLine("相差分钟：" & (date2 - date1).TotalMinutes)
        Console.WriteLine("相差秒钟：" & (date2 - date1).TotalSeconds)
        Console.WriteLine("相差毫秒：" & (date2 - date1).TotalMilliseconds)
        Console.ReadKey()
    End Sub