这是登录界面中登录命令按钮的部分代码：
IF ALLTRIM(权限)=ALLTRIM("管理员")
        aa="是"
    ELSE
        aa="否"
    ENDIF
在登陆后打开的另一个表单的init事件：
IF aa="否"
.F.
.F.
ELSE
.T.
.T.
ENDIF

变量aa在程序开头就要定义为全局变量，并且最好不要用字符串变量，直接用逻辑变量。

登录按钮部分代码
PUBLIC gc权限
c用户名=ALLTRIM(THISFORM.TEXT1.VALUE)
c密码=ALLTRIM(THISFORM.TEXT2.VALUE)
SELECT 密码表
LOCATE FOR ALLTRIM(用户名)==c用户名 AND ALLTRIM(密码)==c密码
IF FOUND()
    gc权限=ALLTRIM(权限)
ENDIF

登陆后打开的另一个表单的init事件：
IF gc权限=="管理员"
    .T.
    .T.
ELSE
    .F.
    .F.
ENDIF

同意2楼，估计是变量作用域的问题。而且，对于这种判断是否的变量，我也赞成用逻辑型的，用起来简单粗暴又方便。

估计是2楼说的原因

同意2楼的原因，同意3楼的做法。。。

关于权限控制的问题，我习惯用Tree控件，+　一个用户角色表　来解决，如果权限不够的用户，界面左边的Tree控件就会只装入允许他看见的东西。
当然，也可以用菜单，在　DEFINE PAD xx OF _MSYSMENU PROMPT " xx" COLOR SCHEME 3     SKIP FOR 变量　这一句中，
注意后面的Skip for ，这是控件权限的，没有权限的，这个菜单也不会出现。