Language Property

A Byte type property. Gets or sets the charset of the character block.

Applies to: Character object

Syntax

[[Let] byteRet =] object.Language

[Let] object.Language = languageSet

The Language property syntax has these parts:

Part Description
object Required. An expression that returns a Character object.
byteRet Optional. A Byte type variable.
languageSet Required. An expression that returns a Byte value.

Remarks

The Language property can take of the the following possible values:

Constant Value Description
ANSI_CHARSET 0 ANSI charset.
DEFAULT_CHARSET 1 Default charset.
SYMBOL_CHARSET 2 Symbol charset.
MAC_CHARSET 77 Macintosh charset.
SHIFTJIS_CHARSET 128 charset.
HANGEUL_CHARSET 129 Hungarian charset.
HANGUL_CHARSET 129 Hungarian charset.
JOHAB_CHARSET 130 charset.
GB2312_CHARSET 134 charset.
CHINESEBIG5_CHARSET 136 Chinese charset.
GREEK_CHARSET 161 Greek charset.
TURKISH_CHARSET 162 Turkish charset.
VIETNAMESE_CHARSET 163 Vietnamese charset.
HEBREW_CHARSET 177 Hebrew charset.
ARABIC_CHARSET 178 Arabic charset.
BALTIC_CHARSET 186 Baltic charset.
RUSSIAN_CHARSET 204 Russian (cyrillic) charset.
THAI_CHARSET 222 Thai charset.
EASTEUROPE_CHARSET 238 East Europe charset.
OEM_CHARSET 255 OEM charset.

The Language property is also a table parameter of the shape which contains the object character block, that is, its value can be described by a formula. To work with Language as a table parameter, use the CDPT_CHAR_LANGUAGE constant tag.

Example

This example demonstrates how to find out the charset of the first Character object of the Shape object with ID 1, located on the current page.

Dim MyShape As Shape


' The shape with ID 1 must exist on the current page
Set MyShape = thisDoc.ActivePage.ShapeByID(1)

' Display information about the charset of MyShape.Character(1)
' (it assumes MyShape.Character(1) exists)
MsgBox(MyShape.Character(1).Language)

 

See Also

SetCharLanguage method