MaxIntelliCADWindow property example

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