菜单栏功能组里的筛选 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Vars("SysUpdatePrintInfo") = True

'任务二

With RibbonTabs("功能区1")("功能组1")("HGroup")

.Items.Clear '清除原有项目

For Each c As Col In CurrentTable.Cols '遍历当前表中的列

'定义一个标准按钮,按钮的名称等于列名称.

Dim b As New RibbonMenu.Button(c.Name)

b.Text = c.Name '按钮的标题也等于列名称

.Items.Add(b)

End With

例子里显示所有列的名称，我想让它只显示：

1、组合框中只显示文本列名称？

2、组合框中只显示数据列名称？

3、组合框中只显示表达显列名称？

主题：菜单栏功能组里的筛选