VB.NET 日期 & 时间

17 Mar 2025 | 6 分钟阅读

在 VB.NET 中，我们使用日期和时间函数来执行与日期和时间相关的各种操作。有时我们需要在我们的应用程序或 Web 应用程序中显示日期和时间，例如上次帖子编辑的时间、新软件版本的升级或补丁详细信息等。

在 DateTime 类中，Date 数据类型存储日期值、时间值或日期和时间值。此外，要执行日期和时间函数，我们需要导入 System.DateTime 类。 DateTime 的默认值介于 00:00:00 午夜，公元 0001 年 1 月 1 日至 11:59:59 下午，公元 9999 年 12 月 31 日之间。

DateTime 的属性和方法

Date: 它用于返回 DateTime 对象的日期组成部分。

Day: 它用于返回 DateTime 对象表示的月份中的某一天。

DayOfWeek: 它用于返回 DateTime 对象表示的星期中的特定一天。

Minute: Minute 属性用于返回 DateTime 对象的分钟组成部分。

DateOfYear: 它用于返回 DateTime 对象表示的年份中的某一天。

Hour: 它用于返回 DateTime 对象表示的日期的小时组成部分。

Now: 它用于返回本地系统的当前日期和时间。

Month: Month 属性用于返回 Datetime 对象的月份名称。

Second: 它用于返回 DateTime 对象的秒数。

Ticks: 它用于返回引用 DateTime 对象的刻度数。

Today: 它用于返回系统的当前日期。

Year: 它用于返回 DateTime 对象表示的日期的年份。

TimeOfDay: 它用于返回 DateTime 对象表示的一天中的时间。

方法

以下是 DateTime 最常用的方法。

DaysInMonth: DaysInMonth 方法用于返回一年中指定月份的总天数。

Add: 它用于通过将 timespan 值添加到 DateTime 对象值来返回新的 DateTime 值。

AddHours: 它用于通过将小时数添加到 Datetime 对象的值来返回新时间。

AddYears: 它用于通过将年份添加到 DateTime 对象的值来返回年份。

AddDays: 它用于通过将天数添加到 DateTime 对象的值来返回新的一天。

AddMinutes: 它用于通过将分钟添加到 Datetime 对象来显示新时间。

AddMonths: 它用于通过将月份添加到 Datetime 对象的值来返回新时间。

AddSeconds: 它用于通过将秒数添加到 Datetime 对象的值来返回新时间。

IsLeapYear: 它使用一个布尔值，表示特定年份是否为闰年。

语法

让我们创建一个 DateTime 对象。

在这里，DateTime 是一个用于使用 new 关键字创建对象的类，而 obj_name 是对象的名称。

让我们创建一个程序，以显示 VB.NET 中 DateTime 类的不同函数。

DiffDateTime.vb

 Imports System.DateTime
Module DiffDateTimevb
    Sub Main()
        ' Create DT as an instance of DateTime
        Dim DT As DateTime = New DateTime()
        Console.WriteLine("Default Date and Time is :{0}", DT)
        Console.WriteLine()
        
        Console.WriteLine(" Different function of DateTime")
        Dim DoB As DateTime = New Date(1998, 9, 7, 12, 22, 30)
        Console.WriteLine(" Day is : {0}", DoB.Day)
        Console.WriteLine(" Month is : {0}", DoB.Month)
        Console.WriteLine(" Year is : {0}", DoB.Year)
        Console.WriteLine(" Hour is : {0}", DoB.Hour)
        Console.WriteLine(" Minute is : {0}", DoB.Minute)
        Console.WriteLine(" Second is : {0}", DoB.Second)
        Console.WriteLine(" Millisecond is : {0}", DoB.Millisecond)
        Console.WriteLine(" Day of Week is : {0}", DoB.DayOfWeek)
        Console.WriteLine(" Day Of year is : {0}", DoB.DayOfYear)
        Console.WriteLine(" Time of Day is : {0}", DoB.TimeOfDay)
        Console.WriteLine(" Total Tick is : {0}", DoB.Ticks)

        ' To get the Max Value of DateTime
        Dim MDT As DateTime = DateTime.MaxValue
        Console.WriteLine(" Max value of Date and Time is {0}", MDT)

        ' To get the Min Value of DateTime
        Dim MinDT As DateTime = DateTime.MinValue
        Console.WriteLine(" Min value of Date and Time is {0}", MinDT)

        ' Create a DateTime from string
        Dim DString As String = "25/10/2020 5:10:29 PM"
        Console.WriteLine("Display Date and Time from string : {0}", DString)
        Console.WriteLine(" Press any key to exit?")
        Console.ReadKey()
    End Sub
End Module

输出

获取当前日期和时间

让我们创建一个程序，以获取 VB.NET 中的当前日期和时间。

CurrDateTime.vb

Imports System.DateTime
Module CurrDateTime
    Sub Main()

        'Display current Date And Time in the following ways.
        Dim CurrDT As Date = Date.Now
        Console.WriteLine(" Current Date and Time is {0}", CurrDT)
        Dim CT As DateTime = DateTime.Now ' Use of Now
        Console.WriteLine(" Current Date and Time is {0}", CT)
        Dim TD As DateTime = DateTime.Today ' Use of Today
        Console.WriteLine(" Today Date is {0}", TD)
        Dim Ut As DateTime = DateTime.UtcNow ' Use of UtcNow
        Console.WriteLine(" Current UtC Date and Time Zone is {0}", Ut)

        Console.WriteLine(" Today is {0} {1}.", CT.DayOfWeek, CT.Day)
        Console.WriteLine(" The month number is {0} and the year {1}.", CT.Month, CT.Year)
        Console.WriteLine(" {0} hours, {1} minutes and the seconds is {2}", CT.Hour, CT.Minute, CT.Second)
        ' Current Time
        Console.WriteLine(" Current Time is {0}", Now.ToLongTimeString)
        Console.WriteLine()
        Console.WriteLine(" Press any key to exit...")
        Console.ReadKey()
    End Sub
End Module

输出

计算出生日期

要在程序中计算出生日期，我们需要使用 TimeSpan。 Timespan 用于存储两个日期之间的差值。 TimeSpan 和 DateTime 之间的区别在于 TimeSpan 表示可能是年或秒的时间间隔，而 DateTime 表示一段时间内的整个日期。

在以下示例中，我们将使用用户的出生日期 (DOB) 来计算年龄。

DofBirth.vb

Imports System.DateTime
Module DofBirth
    Sub Main()
        'Dim age1 As Double
        Console.WriteLine(" Enter Your Date of Birth in DD/MM/YYYY format")
        Dim DB As DateTime = New DateTime()
        DB = Console.ReadLine()
        Dim age As TimeSpan = DateTime.Today - DB

        Console.WriteLine(" Currently, You are {0} years old", Math.Floor(age.Days / 365.255))
        Console.WriteLine(" And You are {0} days or {1} hours old", age.TotalDays, age.TotalHours)
        Console.WriteLine(" Press any key to exit...")
        Console.ReadKey()
    End Sub
End Module

输出

格式化日期

顾名思义，日期格式用于任何应用程序或 Web 应用程序中，以不同的格式表示日期。例如，我们将日期文字指定为 #5/5/2018#，表示 2018 年 5 月 5 日，它表示日期的 mm/dd/yyyy 格式。我们也可以使用格式 dd/mm/yyyy 来显示 2019 年 8 月 12 日。如果本地用户使用另一种格式，例如 yyyy/mm/dd，则文字将无效或编译错误。

在这里，我们使用 string 类的 Format 函数将日期文字转换为自定义或本地格式。此外，我们还可以指定预定义的或用户定义的日期格式。

让我们创建一个程序，以显示 VB.NET 中日期的各种格式。

Date_Format.vb

Imports System.DateTime
Module Date_Format
    Sub Main()
        Console.WriteLine(" Display the different Format of Dates in VB.NET ")
        Dim FT As DateTime = New DateTime(2005, 7, 26, 0, 0, 0)
        ' Use format Specifier to display the various format of the date.
        Console.WriteLine(" Format of Date 'd' : " & FT.ToString("d"))
        Console.WriteLine(" Format of Date 'D' : " & FT.ToString("D"))
        Console.WriteLine(" Format of Date 'R' : " & FT.ToString("R"))
        Console.WriteLine(" Format of Date 'y' : " & FT.ToString("y"))
        Console.WriteLine(" Format of Date 'f' : " & FT.ToString("f"))
        Console.WriteLine(" Format of Date 'F' : " & FT.ToString("F"))
        Console.WriteLine(" Format of Date 't' : " & FT.ToString("t"))
        Console.WriteLine(" Format of Date 'T' : " & FT.ToString("T"))
        Console.WriteLine(" Format of Date 'g' : " & FT.ToString("g"))
        Console.WriteLine(" Format of Date 'G' : " & FT.ToString("G"))
        Console.WriteLine(" Format of Date 'M' : " & FT.ToString("M"))
        Console.WriteLine(" Press any key to exit...")
        Console.ReadKey()
    End Sub
End Module

输出

下一主题VB.NET 窗体控件

VB.NET 日期 & 时间

DateTime 的属性和方法

方法

语法

获取当前日期和时间

计算出生日期

格式化日期

联系信息

关注我们

教程

面试题

在线编译器

Python

Java

.Net Framework

AI, ML and Data Science

Cloud Technology

B.Tech and MCA

Web Technology

PHP

Software Testing

Technical Interview

Java Interview

Python

Web Interview

Database Interview

B.Tech / MCA

Important Interview

Software Testing Interview

Company Interviews

Online Compilers

Multiple Choice Questions

VB.NET 教程

VB.NET 日期 & 时间

DateTime 的属性和方法

方法

语法

获取当前日期和时间

计算出生日期

格式化日期

相关帖子

动态控件

VB.NET 窗体控件

VB.NET 动态数组

VB.NET 对话框

NameValueCollection

CheckBox 控件

VB.NET 关键字

VB.NET List

变量 & 常量

打印对话框

订阅 Tpoint Tech

联系信息

关注我们

教程

面试题

在线编译器