[5分]如何在平台当中按照用户权限的不同设定工具菜单的相应权限？

    我通过平台开发的软件当中，因工作需要添加了工具菜单,具体如下图所示，现在我想在001用户（人资专员组）登陆的时候，不能访问合同档案和调动、离职模块，而当002用户（管理员组）登陆的时候则全部模块都可以访问，请问高手如何解决问题？

    合同档案快捷菜单访问的代码如下：

Function htda()
    g_acchelp_cmdSort1_Click
    menulabMouseClick (1)
    MouseOnClick (5)
End Function