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方法。
3、DateTime类中用Compare方法对两个DateTime实例进行比较,返回0、1、-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方法计算say1和day2之间的差值,返回一个TimeSpan类型实例,把它 '赋给变量timespan,再调用TotalDays方法得到计算的天数 timespan = day2.Subtract(day1) Console.WriteLine("day1和day2之间相差的天数为:" & timespan.TotalDays() & "天") Dim i As Integer '声明变量i存放Compare得到的结果(0、1、-1) i = DateTime.Compare(day1,day2) If i < 0 Then |