string ls_user,ls_pass,ls_passdata
integer li_count

ls_user = trim(sle_user.text)
ls_pass = trim(sle_pass.text)

if isnull(ls_pass) then ls_pass = ""
select count(*)
into :li_count
from 用户清单表
where 姓名 =:ls_user;

if li_count < 1 then
messagebox("提示信息","请输入正确的用户名!")
sle_user.setfocus()
return
end if

//设置密码
select 密码
into :ls_passdata
from 用户清单表
where 姓名 =:ls_user;

if isnull(ls_passdata) then ls_passdata = ""
end if

if ls_pass <> trim(ls_passdata)
then messagebox("提示信息","请输入正确的密码!")

sle_pass.setfocus()
return
end if

closewithreturn(parent,"Login")



Error c0031:Syntax error

谢谢大哥们的指点，我已经找出错误了
小弟是新手