通过

Application.Languages Property

  • 项目
Word Developer Reference

Returns a Languages collection that represents the proofing languages listed in the Language dialog box (on the Tools menu, click Language, and then click Set Language).

Syntax

expression.Languages

expression   A variable that represents an Application object.

Remarks

For information about returning a single member of a collection, see Returning an Object from a Collection.

Example

This example returns the full path and file name of the active spelling dictionary.

Visual Basic for Applications 
  Dim dicSpell As Dictionary

Set dicSpell = _
Languages(Selection.LanguageID).ActiveSpellingDictionary


MsgBox dicSpell.Path & Application.PathSeparator & dicSpell.Name

This example uses the aLang() array to store the proofing language names.

Visual Basic for Applications 
  Dim intCount As Integer
Dim langLoop As Language
Dim aLang(Languages.Count - 1) As String

intCount = 0
For Each langLoop In Languages
aLang(intCount) = langLoop.NameLocal
intCount = intCount + 1
Next langLoop

See Also