Dim C1Ribbon1 As C1Ribbon.C1Ribbon = Ctype(BaseMainForm.controls("C1Ribbon1"),C1Ribbon.C1Ribbon )
Dim a As New Windows.Forms.picturebox
a.BackgroundImage = getimage("F:\\Images\\Me\\cover300px.gif")
a.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch
Dim b As New C1Ribbon.RibbonControlHost(a)
b.name = "自定义项1"
b.width = basemainform.width-100
b.height = 120
C1Ribbon1.tabs("Table").Groups("Style").Items.Insert(0,b)
2、
在菜单设计那里,把【功能组】的标题清空。