在系统的密码登录表单里，填入的密码正确，按‘确定’键进入系统内部（即进入‘系统主表单’），它的程序如何编呢？
（另外，我己将密码表单的数据环境设置为‘密码表’，‘密码表’的字段名只有1个，是‘密码’。这样做正确吗？该如何设置整个密码表单呢？）

那样设置是可以呀,要是在密码表上加多一个用户名呀,也不错呀,密码的代码你一点都不会吗

private npassword
select user
npassword=alltrim(thisform.txt密码.value)
locate for alltrim(用户名)=alltrim(thisform.txt用户名.value)
if found().and.npassword=alltrim(密码)
    thisform.visible=.f.
    do form main
else
    =messagebox("用户名或密码错误，请用户重新输入")
    thisform.txt用户名.setfocus
endif        

use F:\VF练习\表\denglu.dbf set exact on locate for allt(xm)=allt(thisform.xm.value) if found() if allt(thisform.cpass.value)=allt(cpass) messagebox("欢迎进入!",0,"登陆提示") thisform.release else thisform.n=thisform.n-1 if thisform.n=0 messagebox("密码错误,登陆失败!",16,"失败提示") thisform.release else thisform.cpass.value="" thisform.cpass.setfocus messagebox("密码错误,请重新输入!",16,"错误提示") thisform.l.caption="你还有"+str(thisform.n,2)+"次机会" thisform.refresh

endif endif endif 在表单属性中新设属性n=3 并在表中加一个标签,name=l