主题：[求助]菜单字体颜色

设置颜色这样写

Dim obj = CType(BaseMainForm,C1Ribbon.C1RibbonForm).Ribbon
For Each btn As object In obj.tabs("Other").groups("Execute").items
    btn.ForeColorInner = color.blue
Next
obj.tabs("Other").groups("Execute").items("Command").ForeColorInner = color.red