Speed up dimension reading

I'm currently working on an external application forSolidWorks using vb.net 2008
I need the speed up the reading of dimension values. I read up to20 at a time depending on what the changed value is driving. I'vetried

D2 = CType(swDoc.Parameter(DimensionName), SldWorks.Dimension)
DimValue =D2.GetSystemValue3(SwConst.swInConfigurationOpts_e.swThisConfiguration,Nothing)

and

RetVal = swDoc.Parameter(DimensionName).SystemValue()

Both functions have the same slow performance.

Can anyone suggest a better (faster) way of reading a group ofdimensions?

Thanks

SolidworksApi macros