Automatically zooms the screen to fit in the size. | |
Syntax: | Boolean =
object.ZoomToWindowSize object.ZoomToWindowSize = Boolean |
Description: | When this value is set to true, the screen is
zoomed to fit within the current window size. Example: Sub GefScreen_ZoomToWindowSize() Dim oCimScr As GefScreen Set oCimScr = CimGetScreen oCimScr.ZoomToWindowSize =
True End Sub |