The Position property returns or specifies the position of the characters in a text object. The Position property returns a value of cdrFontPosition.
Examples:
The following VBA example creates a text object with a subscript character.
Sub Test()
Dim s As Shape
Set s = ActiveLayer.CreateArtisticText(4, 5, "H2O")
s.Text.FontPropertiesInRange(2, 1).Position = cdrSubscriptFontPosition
End Sub