Share via


NumeralShapes Property [Access 2003 VBA Language Reference]

Language-specific information

You can use the NumeralShapes property to specify or determine numeral shapes to be displayed and printed in a combo box, label, list box, or text box. Read/write Byte.

expression.NumeralShapes

expression Required. An expression that returns one of the objects in the Applies To list.

Remarks

The NumeralShapes property uses the following settings.

Setting Visual Basic Description
System 0 Numeral shapes determined by the Numeral Shapes system setting.
Arabic 1 Arabic digit shapes will be used to display and print numerals.
National 2 National digit shapes will be used to display and print numerals.
Context 3 Numeral shapes determined by Unicode context rules for adjacent text.

You can set this property by using the property sheet or Visual Basic .

Example

The following example changes the NumeralShapes property for the selected control to 0 (numeral shapes will be determined by the Numeral Shapes system setting).

Public Sub ChangeNumeralShapes(ctl As Control)
     ctl.NumeralShapes = 0
End Sub

Applies to | ComboBox Object | Label Object | ListBox Object | TextBox Object