Private Sub OnlyWindowArea_Example()
' This example returns/sets the OnlyWindowArea property.
Dim wArea As Long
Dim newWArea As Long
wArea = IntelliCAD.PlotManager.OnlyWindowArea
MsgBox "The OnlyWindowArea property is: " & wArea
newWArea = InputBox("Type a new value for the OnlyWindowArea:")
IntelliCAD.PlotManager.OnlyWindowArea = newWArea
MsgBox "The new OnlyWindowArea property is: " & IntelliCAD.PlotManager.OnlyWindowArea
End Sub