Closes a screen or screens. | |
Syntax: | object.Close SaveChanges |
Parameters: |
Optional SaveChanges As GefSaveChangesEnum -
|
Description: | For GefScreen, closes the specified
GefScreen. The GefSaveChangesEnum parameter indicates whether to save changes. This parameter is ignored by CimView. Example: Sub GefScreen_Close() Dim oCimScr As GefScreen Dim oCimApp As
GefApplication Set oCimScr = CimGetScreen Set oCimApp =
oCimScr.Application If UCase(oCimApp.Name) =
UCase("CimView.Exe") Then oCimScr.Close Else oCimScr.Close
gefSaveChangesYes End If End Sub |