ISDatePeriodDialog.Execute

Description

This function opens the dialog window and returns True if the user pressed Ok button.

Syntax

object.Execute()

Part Attribute Type Description
object Required
The object always implements the ISDatePeriodDialog interface

Return Value

bool

Returns True if the Ok button was pressed.

Example

Show the data range dialog with pre-initilised values and display the user-entered start date.

Dim aDialog
Dim aResult

Set aDialog = Profile.CommonDialog.NewPeriodDialog
aDialog.DaysCtrlVisible = True
aDialog.StartDate = #10/10/2018#
aDialog.EndDate = #12/12/2018#

aResult = aDialog.Execute

if aResult then 
  Profile.MsgBox(aDialog.StartDate)
else 
  Profile.MsgBox("The time range was not selected")
end if
Note:

Version information

Added in v7.8.0