Scaling Objects that are in Model Space

[Anonymous]

I would like to scale all objects by x2 in Model Space using reference point xyz=0. Just like one would do via scale command. However, I would like to do so programmatically in VB.NET

I have no idea where to even start, so any advice or suggestions will be plenty appreciated.

Thank you,

-Jay

[chiefbraincloud]

Well, you'll need to open the ModelSpace BlockTableRecord, and for every entity you find there, do

entity.TransformBy(Matrix3d.Scaling(2, Point3d.Origin))

[Anonymous]

Thank you very much Chiefbrain . . .  it works, but the speed is significantly slower when I run it in AutoCAD 2011 vs. AutoCAD 2008.  In 2008 it scales the same drawing in split seconds vs. in 2011 it takes about 3-4 seconds.

Very frustrating and inconsistent, as to why? If anyone has any idea or advice I would appreciate you help very much.

Thank you in advance,

-Jay

p.s. The drawing size is less than 1mb. And I running both CADs on Win7 Pro 32bit