vb用户权限问题

我看了一个仓库管理系统的例子，用户有两种权限，一种是System可以访问任何菜单，一种是Guest仅可以访问一部分菜单，他是使用function函数在公共模块下写的，然后在MDIform1中call 权限，但是还要在登录窗体中获取登录时用户的应有权限，请问如何获取以及放在那段代码处？希望讲解的详细一点