Returns the identifiers of all block definitions in the document.
Rhino.BlockIds ()
None.
Array |
An array of block definition identifiers if successful. |
Null |
If not successful, or on error. |
Dim arrBlocks, strBlock
arrBlocks = Rhino.BlockIds
If IsArray(arrBlocks) Then
For Each strBlock In arrBlocks
Call Rhino.Print(strBlock)
Call Rhino.Print(Rhino.BlockName(strBlock))
Next
End If