各位老师，我在想功能区实现这三样场景，但我考了论坛相关帮助后，代码如下：功能区插入图片：
Dim C1Ribbon1 As C1Ribbon.C1Ribbon = Ctype(BaseMainForm.controls("C1Ribbon1"),C1Ribbon.C1Ribbon )
Dim a As New system.Windows.Forms.picturebox
a.BackgroundImage = getimage("D:\用户目录\Desktop\管理项目1\管理项目1\Images\001.png")
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("功能区1").Groups("功能组2").Items.Insert(0,b)
------------------------------------------------------------------------------------------
天气预报：
Dim C1Ribbon1 As C1Ribbon.C1Ribbon = Ctype(BaseMainForm.controls("C1Ribbon1"),C1Ribbon.C1Ribbon )
Dim a As New system.Windows.Forms.WebBrowser
a.Navigate("http://i.tianqi.com/index.php?c=code&id=12&icon=1&num=5&site=12")
Dim b As New C1Ribbon.RibbonControlHost(a)
b.name = "自定义项1"
b.width = 800
b.height = 120
C1Ribbon1.tabs("功能区1").Groups("功能组2").Items.add(b)
-----------------------------------------------------------------
当前时间显示：
RibbonTabs("功能区1").Groups("功能组3").Items("标签1").text = "今天是:" & format(Date.now, "G")
但把以上三段代码输入，它是提示变量错误的，请各位老师指导一下，谢谢！
加好友 
发短信
Post By：2021/4/13 14:22:00 [只看该作者]
