For Each a1 As RibbonMenu.Tab In RibbonTabs
For Each a2 As RibbonMenu.group In a1.Groups
For Each a3 As RibbonMenu.RibbonItem In a2.Items
If Typeof a3 Is RibbonMenu.Button
Output.Show(a3.Text) 这里用a3.name 是没有问题的 但是我想显示出来标题，提示出错，怎么办
End If
Next
Next
Next
以下内容为程序代码:
1 For Each a1 As RibbonMenu.Tab In RibbonTabs
2 For Each a2 As RibbonMenu.group In a1.Groups
3 For Each a3 As RibbonMenu.RibbonItem In a2.Items
4 If Typeof a3 Is RibbonMenu.Button
5
6 Output.Show(a3.Text) 这里用a3.name 是没有问题的 但是我想显示出来标题，提示出错，怎么办
7
8 End If
9 Next
10 Next
11 Next
12
13
14
错误图片
加好友 
发短信
Post By：2013/9/28 22:43:00 [显示全部帖子]
