表单退出按钮命令代码（单击退出按钮）

今天给各位分享表单退出按钮命令代码的知识，其中也会对单击退出按钮进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、如何编写登录表单和退出表单
• 2、vfp:请问这个，退出表单运行代码怎么写
• 3、visualfoxpro表单退出代码
• 4、vfp表单设计中，”退出按钮”功能如何关闭并释放表单？代码写什么？
• 5、VF窗体设计中 设置命令按钮的标题为“退出” 使“退出”按钮要具有关闭表单功能 求高手解释怎么做
• 6、FoxPro 表单中需单击关闭按钮或按alt+q表单退出要如何写代码？

如何编写登录表单和退出表单

采用什么语言？vfp么？还是C？java？请楼主明确·

登陆表单简单描述如下：

第一步，建立默认账户自由表：

假设表名为yh.dbf包含用户名yhm，密码mm两个字段，字段属性自己规定。

第二步，建立登陆表单：

表单名字login.scx，包含三个标签，三个文本框，三个按钮文件

三个标签的caption分别改为：用户名，密码，确认密码

三个按钮的caption分别改为：注册，登陆，退出

把第一步建立的表加入到该表单的数据环境中。

第三步，适当调整各个控件的位置。并填写以下代码：

表单form的init事件代码：

thisform.label3.visible=.f.

thisform.text3.visible=.f.

注册（command1）按钮的click代码：

thisform.label3.visible=.t.

thisform.text3.visible=.t.

thisform.command2.enabled=.f.

thisform.command1.caption=“保存”

thisform.refresh

if thisform.text3.visible=.t.

use yh

go top

locate for alltrim(thisform.text1.value)==alltrim(yh.yhm)

if found()

messagebox(“该用户已存在！请重新输入用户名！”,0,“提示信息”)

return

eles

if alltrim(thisform.text2.value)==alltrim(thisform.text3.value)

append

replace yhm with alltrim(thisform.text1.value)

replace mmm with alltrim(thisform.text2.value)

messagebox(“注册成功！",0,"提示信息")

thisform.text2.value=''

thisform.text3.value=''

thisform.text3.visible=.f.

thisform.label3.visible.f.

thisform.command1.caption=”注册"

thisform.refresh

else

messagebox(“两次密码不一致”,0,"错误信息！")

thisform.text2.value=''

thisform.text3.value=''

return

endif

endif

endif

use

thisform.refresh

登陆按钮（command2）的代码：

locate for alltrim(thisform.text1.value)==alltrim(yh.yhm) and ;

alltrim(thisform.text2.value)==alltrim(yh.mm)

if found()

messagebox(”登陆成功！",0,"提示信息")

thisform.text1.value=''

thisform.text2.value=''

thisform.refresh

else

messagebox("用户名或者密码错误！",0,"错误信息！")

thisform.text1.value=''

thisform.text2.value=''

thisform.refresh

return

endif

退出按钮（command3）的代码：

thisform.release

基本上可以实现你要的要求了。某些代码可能和你实际操作中的有所变化，请自行调整。另外，如果要实现密码框输入时是看不见数字的，那么要修改text的password char属性

vfp:请问这个，退出表单运行代码怎么写

在表单的init事件里写：thisform.text1.value = “” 初始化text1，让其输入的值为字符型

按钮事件：

cStr = alltirm(thisform.text1.value)

try

if val(cStr) 100 将字符型转化成数值型并检测是否小于100

thisform.releas() 小于100则退出表单

endif

CATCH 如果字符包含了非法字符（val(cStr) 会抛出错误，则跳到此处）则退出表单

thisform.releas()

endtry

条件满足了赋值

with thisform

.textbox2.value = subst(cStr,1,1)

.textbox3.value = subst(cStr,2,1)

.textbox4.value = subst(cStr,3,1)

endwith

visualfoxpro表单退出代码

在Visual FoxPro中,为了将表单从内存中释放(清除),可将表单中退出命令按钮的Click事件代码设置为 A.ThisForRefr

vfp表单设计中，”退出按钮”功能如何关闭并释放表单？代码写什么？

关闭表单可以用thisform.release或release

thisform

输入密码显示*只需将文本框的passwordchar属性设置为*

或者用代码：thisform.text1.passwordchar="*"

VF窗体设计中 设置命令按钮的标题为“退出” 使“退出”按钮要具有关闭表单功能 求高手解释怎么做

vfp

增加一个命令按钮command1

右击，打开属性框，把caption属性的值"command"改为"退出"

找到init，双击打开，写代码：

thisform.release

FoxPro 表单中需单击关闭按钮或按alt+q表单退出要如何写代码？

怎么验证口令? 用户名和口令是放在一个表里吗?

假如有表,名称user,字段用户名,口令,都是字符型

表单上有2个文本框,txtuser,txtpassword, 1个确认按钮cmdok

要弄个公共变量存储错误次数, 不能用局部变量,否则按钮代码执行完就释放了.如果自定义表单属性存放更好.

1,在表单的init事件中定义存储密码错误次数的变量:

public gnerror

gnerror=0

2,确认按钮的click代码:

select user

locate for 用户名=thisform.txtuser.value and 口令=thisform.txtpassword.value

if found()

mesagebox("欢迎进入系统")

thisform.release

else

gnerror=gnerror+1

if gnerror=3

messagebox("你是第"+alltrim(str(gnerror))+"次输入，请重试")

else

mesagebox("对不起，你不是合法用户，请退出")

endif

endif

表单退出按钮命令代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于单击退出按钮、表单退出按钮命令代码的信息别忘了在本站进行查找喔。