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

老师好！

我测试下面代码把功能区隐藏了

Dim a As C1Ribbon.C1Ribbon = BaseMainForm.controls("C1Ribbon1")

a.VisualStyle = 0

a.RibbonStyle.ColorSet(C1.Win.C1Ribbon.StyleColor.TabBackground) = Color.Bisque

a.RibbonStyle.ColorSet(C1.Win.C1Ribbon.StyleColor.FormBackground) = Color.LightSkyBlue

a.RibbonStyle.ConstSet(C1.Win.C1Ribbon.StyleConst.ContentAreaHeight) = 0

用以下代码恢复无用，这是管理快速访问栏的

For Each r As RibbonMenu.Tab In RibbonTabs

r.visible = True

ApplicationMenu.visible = True

ConfigBar.visible = True

请问老师应该怎么恢复功能区？

主题：功能区恢复代码