返回介绍

KeyCategory 属性

发布于 2019-09-29 10:11:37 字数 1439 浏览 1309 评论 0 收藏 0

全部显示

返回分配给指定组合键的项目类型。WdKeyCategory,只读。

WdKeyCategory 可以是下列 WdKeyCategory 常量之一:
wdKeyCategoryAutoText
wdKeyCategoryCommand
wdKeyCategoryDisable
wdKeyCategoryFont
wdKeyCategoryMacro
wdKeyCategoryNil
wdKeyCategoryPrefix
wdKeyCategoryStyle
wdKeyCategorySymbol

expression.KeyCategory

expression 必需。该表达式返回“应用于”列表中的一个对象。

示例

本示例显示分配给字体名称的按键。如果尚未给字体分配按键,则显示一条消息。

Dim kbLoop As KeyBinding
Dim intCount As Integer

intCount = 0

For Each kbLoop In KeyBindings
 If kbLoop.KeyCategory = wdKeyCategoryFont Then
 intCount = intCount + 1
 MsgBox kbLoop.Command & vbCr & kbLoop.KeyString
 End If
Next kbLoop

If intCount = 0 Then _
    MsgBox "Keys haven't been assigned to fonts"

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文