VB Scripting: CATPart Description Macro Example

How do you return a CATPart or CATProduct description with a macro?
Using VB scripting you can use the following CATScript code to loop
through all the parts within a product assembly and return what the
description is. When you right click on a part within
an assembly you will actually see two description boxes - component and
product (pictured below). 




The top description name in the