在VSTO Microsoft Word加载项中自动按组合键alt + x

问题描述

我想创建一个Microsoft Word加载项。主要功能是下拉菜单或组合框菜单。 在下拉菜单项中，值包含一个单词。当用户选择项目时，应将其转换为Unicode并显示在工作表中。但是，我要进行特殊操作。

示例： 物品=“阿拉” Unicode = FDF2

当用户选择项目“阿拉”时，它将转换为Unicode“ FDF2”，并自动按alt + x将Unicode更改为伊斯兰图案。

这是我的代码：

Imports Microsoft.Office.Tools.Ribbon

Public Class Ribbon1

    Private Sub Ribbon1_Load(ByVal sender As System.Object,ByVal e As RibbonUIEventArgs) Handles MyBase.Load
        AddItemsToDropDown()
    End Sub

    Private Sub ComboBox1_TextChanged(sender As Object,e As RibbonControlEventArgs) Handles ComboBox1.TextChanged

        Label1.Label = Me.ComboBox1.Text
    End Sub

    Sub AddItemsToDropDown()
        Dim itemX As RibbonDropDownItem = Globals.Factory.GetRibbonFactory().CreateRibbonDropDownItem
        Dim itemY As RibbonDropDownItem = Globals.Factory.GetRibbonFactory().CreateRibbonDropDownItem
        Dim itemZ As RibbonDropDownItem = Globals.Factory.GetRibbonFactory().CreateRibbonDropDownItem
        itemX.Label = "Allah"
        itemY.Label = "Rasulullah"
        itemZ.Label = "Sall Allahu alayhi wa sallam"
        Me.ComboBox1.Items.Add(itemX)
        Me.ComboBox1.Items.Add(itemY)
        Me.ComboBox1.Items.Add(itemZ)


    End Sub
End Class

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）