GefScreen.ChildScreens (read-only property)

Returns the collection of child Captive Popup or Dialog Popup screens associated with the active screen.
Syntax: Set GefChildScreens = object.ChildScreens
Description: The ChildScreens property is used for captive windows. The following example would go on the screen opened by GefApplication.DialogPopup.


Sub GefScreen_ChildScreens()
    Dim oCimScr As GefScreen
    Dim oCimChildScr As GefChildScreens
    Dim nScreenCount As Long
    Set oCimScr = CimGetScreen()
    Set oCimChildScr = MyScreen.Parent.Item(0).ChildScreens
    nScreenCount = MyChildren.Count
    MsgBox "The Number of Child Screens is/are " & ScreenCount
End Sub