DetectLanguage 方法

       

分析指定文本,以确定书写文本的语言类型。

expression.DetectLanguage

expression  必需。该表达式返回 DocumentRangeSelection 对象。

说明

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