Enter a block name or select an inserted block, and then specify an object type,
such as line or text, to list. You can press Enter to list all objects in the block
definition. The prompts are as follows:

Command: BLOCK?

Enter block name <Return to select: Enter the name of a block definition or press Enter to select a block

Select a block: Use an object selection method

Enter an entity type <Return for all: Enter the name of an object type, or press Enter to list all objects in the block
definition

Example

Block name/<Return to select: Enter furn01

Enter an entity type <Return for all: Enter line

Press ESC to exit or press any other key to continue the list.

((0 . “BLOCK”) (2 . “FURN01”) (70 . 0) (10 0.0 0.0 0.0) (-2 . <Entity name: 1f30c10))
((-1 . <Entity name: 1f30c28) (0 . “LINE”) (5 . “F5”) (100 . “AcDbEntity”) (67 .
0) (8 . “0”) (100 . “AcDbLine”) (10 20.0346 22.2133 0.0) (11 4.19456 22.2133 0.0)
(210 0.0 0.0 1.0))

File

blockq.lsp