分析指定文本,以确定书写文本的语言类型。
expression.DetectLanguage
expression 必需。该表达式返回 Document、Range 或 Selection 对象。
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