If SystemMenu = False Then Return
If User.Type<>usertypeenum.developer Then
RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = False
RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = False
Else
RibbonTabs("订单组").Groups("订单").Items("成本报价").Enabled = True
RibbonTabs("订单组").Groups("订单").Items("订单明细").Enabled = True
End If