用Visual FoxPro做一个密码的程序，要有限制输入次数，最好有代码

设置表（密码表）里面添加字段用户名和密码用于你存储密码和用户名的！新建表单调用数据环境添加密码表，添加窗体控件combo1、text1、spinner1、command1，并在command1的click过程加入命令：locate all for alltrim(密码表.用户名)=alltrim(thisform.combo1.value)
if found()
if alltrim(thisform.text1.value)==alltrim(密码表.密码)
do form 你的表单
thisform.release
else
thisform.spinner1.value=thisform.spinner1.value+1
if thisform.spinner1.value=3
messagebox("对不起口令不正确！"+chr(13)+"对不起，你无权使用！",48,"登入信息")
thisform.release
quit
endif
messagebox("密码错误，请重新输入！",48,"登入信息")
thisform.text1.setfocus
thisform.text1.value=""
thisform.refresh
endif
endif