Override the Dimension Style
Each dimension has the capability of overriding settings in the dimension style for that dimension. The following properties are available for most dimension objects:
Specifies the rounding of alternate units.
Specifies the unit format for angular dimensions.
Specifies the block to use as the custom arrowhead for the dimension line.
Specifies the type of arrowhead for the dimension line.
Specifies the size of dimension line arrowheads, leader line arrowheads, and hook lines.
Specifies the size of the center mark for radial and diameter dimensions.
Specifies the type of center mark for radial and diameter dimensions.
Specifies the character to be used as the decimal separator in decimal dimension and tolerance values.
Specifies the color of the dimension line for a dimension, leader, or tolerance object.
Specifies the lineweight for the dimension lines.
Specifies the suppression of the dimension lines.
Specifies the display of dimension lines inside the extension lines only.
Specifies the color for dimension extension lines.
Specifies the distance the extension line extends beyond the dimension line.
Specifies the distance the extension lines are offset from the origin points.
Specifies the lineweight for the extension lines.
Specifies the endpoint of extension lines.
Specifies the start point of extension lines.
Specifies the suppression of extension lines.
Specifies the placement of text and arrowheads inside or outside extension lines.
Specifies if a dimension line is drawn between the extension lines even when the text is placed outside the extension lines.
Specifies the format of fractional values in dimensions and tolerances.
Specifies the horizontal justification for dimension text.
Specifies a global scale factor for linear dimensioning measurements.
Specifies the number of decimal places displayed for the primary units of a dimension or tolerance.
Specifies the suppression of leading and trailing zeros in dimension values.
Specifies the suppression of a zero foot and zero inch measurement in dimension values.
Specifies the color of the text for dimension and tolerance objects.
Specifies the distance between the dimension text and the dimension line when you break the dimension line to accommodate dimension text.
Specifies the height for the dimension or tolerance text.
Specifies if the dimension text is to be drawn inside the extension lines.
Specifies the position of dimension text inside the extension lines for all dimension types except ordinate.
Specifies how dimension text is drawn when text is moved.
Specifies the position of dimension text outside the extension lines for all dimension types except ordinate.
Specifies the dimension text position.
Specifies the precision of angular dimension text.
Specifies the dimension value prefix.
Specifies the rotation angle of the dimension text.
Specifies the dimension value suffix.
Specifies if tolerances are displayed with the dimension text.
Specifies a scale factor for the text height of tolerance values relative to the dimension text height.
Specifies the vertical justification of tolerance values relative to the nominal dimension text.
Specifies the minimum tolerance limit for dimension text.
Specifies the precision of tolerance values in primary dimensions.
Specifies the suppression of leading zeros in tolerance values.
Specifies the suppression of trailing zeros in dimension values.
Specifies the maximum tolerance limit for dimension text.
Specifies the unit format for all dimensions except angular.
Specifies the vertical position of text in relation to the dimension line.
Enter a user-defined suffix for an aligned dimension
This example creates an aligned dimension in model space and uses the TextSuffix property to allow the user to change the text suffix for the dimension.
Sub Ch5_AddTextSuffix()
Dim dimObj As AcadDimAligned
Dim point1(0 To 2) As Double
Dim point2(0 To 2) As Double
Dim location(0 To 2) As Double
Dim suffix As String
' Define the dimension
point1(0) = 0: point1(1) = 5: point1(2) = 0
point2(0) = 5: point2(1) = 5: point2(2) = 0
location(0) = 5: location(1) = 7: location(2) = 0
' Create an aligned dimension object in model space
Set dimObj = ThisDrawing.ModelSpace. _
AddDimAligned(point1, point2, location)
ThisDrawing.Application.ZoomAll
' Allow the user to change the text suffix for the dimension
suffix = InputBox("Enter a new text suffix for the dimension" _
, "Set Dimension Suffix", ":SUFFIX")
' Apply the change to the dimension
dimObj.TextSuffix = suffix
ThisDrawing.Regen acAllViewports
End Sub