在菜单中设置一个组合按钮“打开表”

DropDown事件如下：
e.SplitButton.Items.Clear
For Each t As Table In Tables
    Dim a As String = t.DataTable.Name
    Dim b As New RibbonMenu.Button(a)
    b.Text = a
    e.SplitButton.Items.Add(b)
Next
这样点击后可以看到所有的表名

但是不知道怎样在选择点击后能返回这某个表名呢？

想点击后在DropDownClosed事件中能打开这个表:
Dim _打开表 As RibbonMenu.SplitButton = RibbonTabs("管理").Groups("辅助").Items("打开表")
If _打开表.Text <> "" Then
    \'Tables(_打开表.text).Visible = True
End If

而Text只返回组件的标题，不是返回点击的表名，所以代码不对哦。

请教各位大神代码该如何写。

需要去编写【主菜单】->事件->【click】

根据e.Sender.Name或者e.Sender.Text，打开对应的表即可。

如

If Tables.Contains(e.sender.name) then

    maintable = Tables(e.sender.name)

End If