刚接触vfp，老师给个作业练手，做图书馆的管理系统，在做用户登录表单的时候出了问题，确定控件中的click事件我用的下面的代码，显示有不可识别的短语或关键字，还有函数中缺少 ）。大大们帮忙看下哪里出了问题，谢谢了。
tempstr="
FOR i=1 TO LEN(TRIM(thisform.text1.Value))
   tempchr=BITXOR(ASC(SUBS(thisform.text1.Value,i.1)),123)
   tempstr=tempstr+CHR(tempchr)
ENDFOR
LOCATE FOR UPPER(系统账号，账号)=UPPER(ALLT())
IF FOUND( )and ALLT(系统账号，密码)==tempstr
   Thisform.showform=.t.
              RELEASE thisform
ELSE
   IF n<=3
          MESSAGEBOX("用户名或密码有误，请重新输入",48+0,"登录")
          Thisform.text1.SetFocus
          N=n+1
   ELSE
          MESSAGEBOX("不能提供正确的密码，系统将关闭。",48+0,"登录")
          RELEASE thisform
   ENDIF
ENDIF

LEN(TRIM(thisform.text1.Value))
LEN(TRIM(alltrim(thisform.text1.Value),?))


tempchr=BITXOR(ASC(SUBS(thisform.text1.Value,i.1)),123)
tempchr=BITXOR(ASC(SUBS(alltrim(thisform.text1.Value),i,1)),123)

LOCATE FOR UPPER(系统账号，账号)=UPPER(ALLT())
LOCATE FOR UPPER(系统账号.账号)=UPPER(ALLT())

IF FOUND( )and ALLT(系统账号，密码)==tempstr
IF FOUND( )and ALLT(系统账号.密码)==tempstr


[ 本帖最后由 sdta 于 2012-7-6 14:08 编辑 ]

多谢斑竹，我检查程序太粗心了，问题已经解决。