Word VBA教程:WritingStyleList属性

该属性返回一个字符串数组,该数组包含可用于指定语言的所有写作风格的名称。Variant 类型,只读。

expression.WritingStyleList

expression   必需。该表达式返回一个Language对象。

VBA示例

本示例显示可用于美国英语的所有写作风格。在“Visual Basic 编辑器”的“立即”窗口中也显示每一种写作风格及其在数组中的编号。


Sub WritingStyles()
    Dim WrStyles As Variant
    Dim i As Integer
    WrStyles = Languages(wdEnglishUS).WritingStyleList
    For i = 1 To UBound(WrStyles)
        MsgBox WrStyles(i)
        Debug.Print WrStyles(i) & " [" & Trim(Str$(i)) & "]"
    Next i
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号