返回介绍

KeyCode 属性

发布于 2019-09-29 10:11:38 字数 596 浏览 1174 评论 0 收藏 0

返回指定组合键中的第一个键的唯一代码。Long 类型,只读。

注意 当用 KeyBindings 对象的 Add 方法添加组合键时,用 BuildKeyCode 方法创建该编号。

expression.KeyCode

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

示例

如果 KeyBindings 集合包含 Alt+Ctrl+W,则本示例显示一条消息。

Dim lngCode As Long
Dim kbLoop As KeyBinding

CustomizationContext = NormalTemplate
lngCode = BuildKeyCode(wdKeyAlt, wdKeyControl, wdKeyW)
For Each kbLoop In KeyBindings
 If lngCode = kbLoop.KeyCode Then
 MsgBox kbLoop.KeyString & " is already in use"
 End If
Next kbLoop

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

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

发布评论

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