Метод Range.DetectLanguage (Word)
Анализирует указанный текст, чтобы определить язык, на который он написан.
Синтаксис
выражение. DetectLanguage
выражение (обязательно). Переменная, представляющая объект Range .
Замечания
Результаты метода DetectLanguage хранятся в свойстве LanguageID на основе символов. Чтобы прочитать свойство LanguageID , необходимо сначала указать выделенный фрагмент или диапазон текста.
При применении к объекту Document метод DetectLanguage проверяет весь доступный текст в документе (колонтитулы, нижние колонтитулы, текстовые поля и т. д.). Если указанный текст содержит частичное предложение, выделение или диапазон расширяется до конца предложения.
Если метод DetectLanguage уже применен к указанному тексту, свойству LanguageDetected присвоено значение True. Чтобы повторно оценить язык указанного текста, необходимо сначала задать для свойства LanguageDetected значение False.
Дополнительные сведения об автоматическом обнаружении языка см. в статье Об автоматическом обнаружении языка.
Пример
В этом примере проверяется активный документ для определения языка, на котором он написан, а затем отображается результат.
With ActiveDocument
If .LanguageDetected = True Then
x = MsgBox("This document has already " _
& "been checked. Do you want to check " _
& "it again?", vbYesNo)
If x = vbYes Then
.LanguageDetected = False
.DetectLanguage
End If
Else
.DetectLanguage
End If
If .Range.LanguageID = wdEnglishUS Then
MsgBox "This is a U.S. English document."
Else
MsgBox "This is not a U.S. English document."
End If
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.