Private Sub CenterOnPage_Example()
' This example returns the CenterOnPage property and changes it to 2.
Dim currentCntr As Long
Dim newCntr As Long
currentCntr = IntelliCAD.PlotManager.CenterOnPage
MsgBox "The CenterOnPage property is: " & currentCntr
IntelliCAD.PlotManager.CenterOnPage = 2
newCntr = IntelliCAD.PlotManager.CenterOnPage
MsgBox "The CenterOnPage property is: " & newCntr
End Sub