vf程序设计 ,求大神指点。包括确定,清除按钮的事件编写。 谢过大神!
1个回答
展开全部
简单·····
1.把文本框的passwordchar属性改成“*”(不加引号)
2.在“确定”的命令按钮中输入程序:
n=0
x=thisform.text1.value
if x=visual foxpro 6.0
thisform.label2.caption="密码正确"
else
n=n+1
endif
if n=3
thisform.label2.caption="密码输入错误,请退出"
endif
3.清除的命令按钮输入程序:
thisform.text1.value=.null.
注:如果不行的话,注意修改属性
4.退出的命令就不写了吧
总注:label2是文本框下方的标签,注意更改数字就行了
界面都不会建立的话,建议多看看书,多多的练习书上的简单例题·····
1.把文本框的passwordchar属性改成“*”(不加引号)
2.在“确定”的命令按钮中输入程序:
n=0
x=thisform.text1.value
if x=visual foxpro 6.0
thisform.label2.caption="密码正确"
else
n=n+1
endif
if n=3
thisform.label2.caption="密码输入错误,请退出"
endif
3.清除的命令按钮输入程序:
thisform.text1.value=.null.
注:如果不行的话,注意修改属性
4.退出的命令就不写了吧
总注:label2是文本框下方的标签,注意更改数字就行了
界面都不会建立的话,建议多看看书,多多的练习书上的简单例题·····
追问
我试了 还是不太对啊。。清除不了 ,而且按了确定还是没反应啊。。。
追答
错了一点 把visual foxpro 6.0加上引号就行了
至于 清除的命令 null 是空值的意思 如果不满意的话 可以改成 thisform.text1.value=""
要是此程序更完美的话可以这样:
n=0
x=thisform.text1.value
if x="visual foxpro 6.0"
thisform.label2.caption="密码正确"
else
n=n+1
endif
if mod(n,3)=0
thisform.label2.caption="密码输入错误,请退出"
endif
注:我用VF试过了,可以通过!请重新启动VF试一试。再不行的话就是你的Vf安装出了问题,建议重新安装。
至于你说清除没反应,请检查你的标签号·····
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询