主题：添加按钮

想在系统菜单的项目管理项里加一个按钮，如何实现呢？

在主菜单－功能区－Project中加了“升级文件”功能组，在这个功能组中设置了“上传升级文件”的按钮，现在想实现用开发者登录就显示这个按钮，以别的用户登录就不显示或者以灰色显示，我写了下面的代码，结果出错请老师看看。

 

Dim btn As RibbonMenu.group
If user.name="开发者"
    btn = RibbonTabs("project").Groups("上传升级文件")
    btn.Enabled = True
Else
    btn = RibbonTabs("project").Groups("上传升级文件")

    btn.Enabled = False
End If