编写“确定”按钮代码 ·*验证密码 ·if select("account'")=o&&检查数据表是否打开 ● messagebox("数据表account不存在，请检查后再试！"，o+16,"警告 ● else select account &&选取account:表 set order to UID &&设置username为控制索引 seek allt(thisform.combouser..value)&&按索引查找当前所 选user相关记录 if allt(thisform.combouser..value)==allt(uid)&&检查是否在 库找到该用户 if allt(pwd)==allt(thisform.textpwd.value) messagebox("登陆成功！"，o+64,"恭喜") thisform.release&&将来可以替换成调用系统登陆以后做 的工作 信息技术实验教学中心编写“确定”按钮代码  *验证密码  if select("account")=0 &&检查数据表是否打开  messagebox("数据表account不存在，请检查后再试！",0+16,"警告 ")  else  select account &&选取account表  set order to UID &&设置username为控制索引  seek allt(thisform.combouser.value) &&按索引查找当前所 选user相关记录  if allt(thisform.combouser.value)==allt(uid) &&检查是否在 库找到该用户  if allt(pwd)==allt(thisform.textpwd.value)  messagebox("登陆成功！",0+64,"恭喜")  thisform.release &&将来可以替换成调用系统登陆以后做 的工作 信息技术实验教学中心