参考:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=76721
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 = 300
b.height = 120
C1Ribbon1.tabs("Table").Groups("Style").Items.Insert(0,b)