Private Sub MaxICADWin_Example()
'This example determines the MaxICADWindow property.
Dim myobj As ApplicationPreferences
Dim maxWin As Boolean
Set myobj = IntelliCAD.Preferences
maxWin = myobj.MaxIntelliCADWindow
MsgBox "The MaxIntelliCADWindow property is: " & maxWin
End Sub