主题：如何把标准按钮添加到菜单按钮中？

例如在杂项功能区的工具菜单下面增加一个按钮：

Dim mbn As RibbonMenu.MenuButton = RibbonTabs("Other").Groups("Tools").Items("Tools")
Dim btn  As New RibbonMenu.Button("Foxtable功能很好") '定义一个标准按钮
btn.Text= "技术支持也及时"  '设置按钮的标题
mbn.Items.Add(btn)  '将按钮添加到菜单中