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.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 教程 目录