是的,你可以用模块,在模块中定义个变量,就是共享成员变量,当访问某个窗体时,便给它赋值。
public authorith as integer
public enum AUTHORITH
{
a = 1,//窗体1
b = 2 //窗体2
}
在窗体加载的时候给authorith赋值,就可以了
窗体1的时候,form1_load中,authorith = 1
窗体2的时候,form1_load中,authorith = 2
判断权限的时候就用if authorith = AUTHORITH.a then ...