property Calendar.Date as Date
Retrieves or sets the browsed date.

TypeDescription
Date A DATE expression that indicates the browsed date. 

Ensures that the date is visible. Use the SelDate property to select a date. When the browsed date is changed the control fires the  DateChanged event. By default, the Date property points to the current date. Use the FirstVisibleDate property to get the first visible date. Use the LastVisibleDate property to get the last visible date. Use the MinDate and MaxDate property to specify a range to limit the date to be displayed or selected.

Use the VB Date function in order to get the current date. use the DoDate property to build a DATE expression given year, month and day. The following sample shows how to browse the month "January 2000":

Calendar1.Date = Calendar1.DoDate(2000, 1, 1)