VB6 Tutorial 48: Date and Time Functions

Posted On 2018-05-21 by VB6Boy
Keywords: visual,basic,vb6,visualbasic,tutorial,basic,beginner
Tags: VB6 Tutorials 
Views: 13


Looking for the more of the VB6 Tutorial? Here is the tutorial index.

There are many useful functions for the date-time operations in VB6. Visual Basic gives you enough power for handling the date and time. Here you’ll learn about those functions in brief.

This post will include the functions that are defined in the DateTime module of the VBA library. Search "DateTime" in Object Browser.

Weekday

The weekday function returns the day of the week. It returns a number representing the day.

Syntax

Variable  =  weekday(Date, [FirstDayOfWeek])

This function takes two arguments, one is the optional. You need to pass a date string to this function, and the first day of week which is optional is set to vbSunday by default.

The constant values of FirstDayOfWeek paramenter are as follows:

  • vbSunday
  • vbMonday
  • vbTuesday
  • vbWednesday
  • vbThursday
  • vbFriday
  • vbSaturday
  • vbUseSystemDayOfWeek

Example

Print Weekday("1/4/2014")

Output

7

Year

The year function returns the year from the date.

Example

Print Year("1/4/2014")

Output

2014

Month

The month function returns the month of the year.

Example

Dim m As Integer
m = Month("27 / 3 / 2013")
MsgBox m

Output

3

DateValue

The DateValue function returns the date part from a date/time value.

Example

Dim dt As Date
dt = DateValue(Now)
Print dt

Output

1/4/2014

TimeValue

Returns the time part from a date/time value.

Example

Dim dt As Date
dt = TimeValue(Now)
Print dt

Output

12:51:25 PM

Day

Returns the day part from a date

Example

Dt = Day(Now)

Hour

Returns the hour of the day.

Example

Print Hour(Now)

Minute

Returns the minute of the hour.

Example

Print Minute(Now)

Second

Returns the second of the minute.

Example

Print Second(Now)

DatePart

Returns a specific part from a date.

Syntax

DatePart(Interval, Date, [FirstDayOfWeek], [FirstWeekOfYear])

The interval parameter is the interval part of a date you want. Pass a date value through the Date parameter. FirstDayOfWeek and FirstWeekOfYear are optional parameters, the values of which are vbSunday and vbFirstJan1

Example

Print "year = " & DatePart("yyyy", "4/1/2014")
Print "month = " & DatePart("m", Now)
Print "day = " & DatePart("d", Now)
Print "week = " & DatePart("ww", Now)
Print "hour = " & DatePart("h", Now)
Print "minute = " & DatePart("n", Now)
Print "second = " & DatePart("s", Now)
Print "weekday = " & DatePart("y", Now)

The interval values can be:

  • "yyyy"-Year
  • "m"- Month
  • "d"-Day
  • "ww"-Week
  • "h"-Hour,
  • "n"-Minute
  • "s"-Second
  • "y"-weekday

DateSerial

Returns a Date for a specific year, month and day.

Example

Print DateSerial(2014, 1, 4)

TimeSerial

Returns a time for a specific hour, minute and second.

Example

Print TimeSerial(13, 15, 55)

DateDiff

Returns the number of time intervals between two dates.

Example

dt = DateDiff("d", "5 / 5 / 1990", "26 / 4 / 2013")

The first argument is the interval which can have the value among the interval constants mentioned above.

Looking for the more of the VB6 Tutorial? Here is the tutorial index.


About the Author

has posted a total of 101 articles.


Comments On This Post

No comments on this post yet!


Do you have a thought relating to this post? You can post your comment here. If you have an unrelated question, you can use the Q&A section to ask it.

Or you can drop a note to the administrators if you're not sure where you should post.


Your IP address is:54.159.91.117

Before you can post, you need to prove you are human. If you log in, this test goes away.


Code Links