ISCommonDialogs.NewPeriodDialog

Description

This function returns a new period dialog.

Syntax

object.NewPeriodDialog()

Part	Attribute	Type	Description
`object`	Required	ISCommonDialogs	The `object` always implements the ISCommonDialogs interface

Return Value

ISDatePeriodDialog

Returns a new period dialog.

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