Вычисляет разницу между двумя датами.

x - DateDiff(Part2Diff, Datel, Date2)

Первый параметр определяет, какая составляющая даты (месяцы, дни, часы и т. д.) будет использоваться в вычислении. В качестве этого параметра можно указать, в частности, свойства Datelnterval.Year, Datelnterval.Month, Datelnterval. Date.

Второй параметр является датой, которую необходимо вычесть из третьего параметра.

Dim x as Date, у as Date
X = "4/1/1952"
Y = "3/1/2005"
Labell.Text - DateDiff(Datelnterval.Year, x, y)
X = "1:15"
Y = "1:25"
Label2.Text = DateDiff(Datelnterval.Minute, x, y)

53
10

Возвращает составляющую значения даты или времени.

X = DatePart(Part2Return, Date)

Первый параметр определяет, какую составляющую даты необходимо получить (например, дни или часы). В качестве этого параметра можно указать свойства

Datelnterval.Year, Datelnterval.Month, Datelnterval.Date.

Второй параметр является исходной датой. Возвращаемым результатом будет составляющая этого параметра.

Dim x as Date
X = "4/1/1952 1:15"
Labell.Text = DatePart(Datelnterval.Year, x)
Label2.Text = DatePart{Datelnterval.Minute, x)

1952
15

Возвращает дату, сформированную из значений года, месяца и дня.

X = DateSerial(year, month, day)

Labell.Text = DateSerial("1955", "4", "22")
Label2.Text = DateSerial ("2022", "8", "11")

4/22/1955
8/11/2022

Возвращает число месяца из указанной даты.

x - Day (Date)

Labell.Text = Day("5/1/1971 5:15:32")
Label2.Text= Day("9/21/2022 12:32:54")

1
21