|   |   | Object Model Reference : Classes : D : DimensionLinear : Properties : DimensionLinear.Style | 
Property Style As cdrDimensionStyle
Member of DimensionLinear
The Style property specifies the number-formatting style for the dimension value of a text label.
The following VBA example creates a rectangle and a linear dimension that is linked to the rectangles snap points. The formatting style of the dimension value is then changed to fractional.
| Sub Test() | 
|  Dim shp1 As Shape, shp2 As Shape | 
|  Set shp1 = ActiveLayer.CreateRectangle2(0, 0, 100, 50) | 
|  Set shp2 = ActiveLayer.CreateLinearDimension(cdrDimensionHorizontal, shp1.SnapPoints(1), shp1.SnapPoints(3)) | 
|  shp2.Dimension.Linear.Style = cdrDimensionStyleFractional | 
| End Sub | 
|   |   |   | 
Copyright 2013 Corel Corporation. All rights reserved.