Displays a quick view of an attached drawing.

QuickView( ) As Boolean

Returns True if a drawing can be shown in quick view.

The following example sets the drawing for quick view.

Dim amobj as AcadMap

Dim pobj As AutoCADMap.Project

Dim dsobj as DrawingSet

Dim adobj as AttachedDrawing

Dim retval as Boolean

Set amobj = acadApp.GetInterfaceObject("AutoCADMap.Application")

Set pobj = amobj.Projects(ThisDrawing)

Set dsobj = pobj.DrawingSet

Set adobj = dsobj.Item(5)

retval = adobj.QuickView

If retval = True Then

 MsgBox "The drawing can be displayed in quick view."

Else

 MsgBox "The drawing cannot be displayed in quick view."

End If