if alltrim(thisform.edit1.text)==''&&删除字符串前后的空格
 messagebox('用户名不能为空。',64,'提示')
  thisform.edit1.Setfocus&&获得焦点
  return
endif
set exact on
select longin_1
locate for 用户名=alltrim(thisform.edit1.text)
if (alltrim(用户名)==alltrim(thisform.edit1.text)).and.(alltrim(密码)==alltrim(thisform.edit2.text))
   messagebox("欢迎使用本系统!",48)
   thisform.release
   do maimmenu.mpr
  else
      if thisform.inputon<2
         messagebox("你不是本系统的合法用户！禁止进入本系统！",48)
         thisform.release
         close all
      endif
endif
这段代码执行的结果是，无论你输入的对或是不对，都执行下面的操作。怎么回事？？？