ISDialog.Caption

Description

The caption of the dialog window.

Syntax

object.Caption

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

Return Value

string

Example

Display the dialog window with data entering control. Show the result of its execution.

Dim aDialog
Dim aControl
Dim aResult
Dim aMessage

Set aDialog = Profile.CreateDialog("My Dialog")
set aControl = aDialog.AddControl("Enter Date", 0, DateAdd("d", -1, Now)) ' sctDateTime 
aResult = aDialog.Execute

if aResult then
  aMessage = "Ok button was pressed. "
else
  aMessage = "Cancel button was pressed. "
end if

aMessage = "The dialog window with caption " & aDialog.Caption & " was created." &_
  vbNewLine & aMessage & vbNewLine & "Entered date value is " & aControl.Text

Profile.MsgBox(aMessage)

Note:

Version information

Added in v7.8.0