DateTime日期处理(二)

前端之家收集整理的这篇文章主要介绍了DateTime日期处理(二)前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。

VB.NET 日期使用:

在命名空间System中有两个与日期相关的类:
DateTime:包含一个确切的日期值,有年月日时分秒
TimeSpan:包含两个日期之间的差值

1 一般情况下WriteLine方法DateTime时间以"yyyy/mm/dd"方式显示
ToString方法以指定的格式将DateTime时间显示出来:
ToString格式符如下:
D------ 显示日期(1-7),个位前不加0
Dd------ 显示日期(01-07),个位前不加0
Dddd ------ 3个字符显示日期(Mon)
M------ 显示完整的日期名称(如Monday
MM------ 显示月份(1-12),个位前不加0
MMM------ 显示月份(01-12),个位前不加0
MMMM ------ 3个字符显示月份(Sep)
MMMM ------ 显示完整的月份名称(September)
m------ 显示分钟数,没有0
mm------ 显示分钟数,以0补齐
S------ 显示秒数,没有0
Ss------ 显示秒数,以0补齐
T------ "A"表示AM,用"P"表示PM
Tt------ 显示"AM" or "PM"
Y------ 个位显示的年份,个位前不加0(9)
Yy------ 两位显示年份(12,11)
Yyyy ------ 显示完整的年份(2012)

2、在DateTime类中,用Subtract方法计算两个时间时间差,返回一个TimeSpan类的实例,它可以
保存时间、分钟、秒、天各种类型的时间范围。使用该方法,须先声明一个TimeSpan类型的变量,然
调用该变量对应实例的Subtract方法

3DateTime类中用Compare方法对两个DateTime实例进行比较,返回01-1。此方法中须指定两个
DateTime实例,然后再进行比较。

综合举例如下:

Module Module1

Sub Main()
Dim today As DateTime = DateTime.Now'Now指出要访问的是当前时间
Console.WriteLine("系统当前时间是:"& today)
Dim MonthFromToday,YearFromToday As DateTime
MonthFromToday = today.AddMonths(3) '在当前时间上加上3个月
YearFromToday = today.AddYears(3)'在当前时间上加上3
Console.WriteLine("3个月后的今天为:" & MonthFromToday)
Console.WriteLine("3年后的今天为:" & YearFromToday)
Console.WriteLine("'MMMM dd,yyyy'格式显示系统当前时间为:" &
today.ToString("MMMM dd,yyyy"))
Console.WriteLine("'MM/dd/yy hh:mm:ss tt'格式输出系统当前时间为:" &
today.ToString("MM/dd/yy hh:mm:ss tt"))
Console.WriteLine("'dddd,MMM dd,yyyy'格式输出系统当前时间为:" &
today.ToString("dddd,yyyy"))
Dim day1 As DateTime = New DateTime(1988,3,6)
Dim day2 As DateTime = New DateTime(2012,8,16)
Console.WriteLine("day1 is" & day1.ToString("yyyy MMMM d "))
Console.WriteLine("day2 is" & day2.ToString("yyyy MMMM d "))
Dim timespan As TimeSpan
'此处用Subtract方法计算say1day2之间的差值,返回一个TimeSpan类型实例,把它
'赋给变量timespan,再调用TotalDays方法得到计算的天数
timespan = day2.Subtract(day1)
Console.WriteLine("day1day2之间相差的天数为:" & timespan.TotalDays() & "")
Dim i As Integer
'声明变量i存放Compare得到的结果(01-1
i = DateTime.Compare(day1,day2)
If i < 0 Then
Console.WriteLine("day1小于day2")
ElseIf i > 0 Then
Console.WriteLine("day1大于day2")
Else
Console.WriteLine("day1等于day2")
End If
Console.ReadLine()

End Sub

End Module

----运行结果如下:

VB.NET<wbr>日期使用

原文链接:https://www.f2er.com/vb/259320.html

猜你在找的VB相关文章