SelectAll Method Example

This example uses SelectAll to create an Area object with the same coordinates as the Screen object.

Sub Main()

 Dim Sys As Object, Sess As Object, MyScreen As Object, MyArea As Object

 

 Set Sys = CreateObject("EXTRA.System")

' Assumes an open session

 Set Sess = Sys.ActiveSession

 Set MyScreen = Sess.Screen

 ' This selects the entire screen.

 Set MyArea = MyScreen.SelectAll

End Sub