vb.net 教程 1-8 日期时间类型1

vb.net中日期时间函数使用DateTime，vb6中用的是Date，vb.net中也可以将日期时间定义为Date，两者几乎没有区别。

我们来看定义一个日期时间：

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

        '使用Format将日期时间按照我们的要求输出来
        Console.WriteLine(Format(date1,"yyyy-MM-dd HH:mm:ss"))
        Console.WriteLine(Format(date2,"yyyy年MM月dd日 HH时mm分ss秒"))

显示结果如下：

当然也可以通过，DateTime.Year、DateTime.Month、DateTime.Day、DateTime.Hour、DateTime.Minute、DateTime.Second 来分别获得年月日时分秒

以下两段代码输出一样：

Console.WriteLine("{0}年{1}月{2}日 {3}时{4}分{5}秒",date1.Year,date1.Month,date1.Day,date1.Hour,date1.Minute,date1.Second)

Console.WriteLine(Format(date2,"yyyy年M月d日 H时m分s秒"))

那么我们来看看怎么求两个日期时间的时间差：

        Dim date1,13) '用指定的年、月、日、小时、分钟和秒初始化 DateTime 

        '相差月份
        Dim diffMonth As Integer
        diffMonth = (date2.Year - date1.Year) * 12 + (date2.Month - date1.Month)

        Console.WriteLine("相差月份：{0}",diffMonth)

返回结果如下：

以上只是求月份的差，那么天数差呢？我们还需要考虑大月、小月，闰年等因素。这样就太烦杂了。

我们可以使用DateTime.Subtract 方法，求出从此实例中减去指定的时间或持续时间。实际返回的是一个TimeSpan结构，表示一个时间间隔。

如下代码：

        Dim date1,13) '用指定的年、月、日、小时、分钟和秒初始化 DateTime 

        Dim tspan As TimeSpan
        tspan = date2.Subtract(date1)
        Console.WriteLine(tspan.Hours)
        Console.WriteLine(tspan.TotalHours)

返回结果如下：

需要注意的是

TimeSpan.Hours 返回值为Integer，范围为 -23 到 23
TimeSpan.TotalHours 返回值为Double，包括整数和小数的小时数。

TimeSpan.Days、TimeSpan.TotalDays、TimeSpan.Minutes、TimeSpan.TotalMinutes。。。。请参考上面的TimeSpan.Hours和TimeSpan.TotalHours

我们也可以直接使用算术的减号“-”来求两个日期时间的间隔，其结果为TimeSpan，例如：

    Sub Main()
        Dim date1,date2 As DateTime
        date1 = Date.Now()
        date2 = New DateTime(2018,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

结果是：

上面我们也可看到，由于TotalDays等返回的是一个Double。

最后说一下Format()格式化日期时间的用法

将表达式中的数据按照设置的格式输出字符串

例如：

Format(Now(),"yyyy,MM.dd") ===> 2017,05.10

yyyy：四位年份

MM：两位月份，如果是1-9月，那么前面会加0

dd：两位天数，如果1-9，那么前面加0

其他如：

ddd：星期几

HH：小时

mm：分钟

ss：秒钟

MM、dd、HH、mm、ss对应的M、d、H、m、s：含义相同，但是如果是1-9，前面不会加0。

Format()的其他用法，以后还会讲到。

由于.net平台下C#和vb.NET很相似，本文也可以为C#爱好者提供的参考。

学习更多vb.net知识，请参看 vb.net 教程目录

vb.net 教程 1-8 日期时间类型1

猜你在找的VB相关文章