vfp中的问题 谢谢 急用在线等

来源：百度知道 编辑：UC知道 时间：2024/07/07 11:10:09
我要设计学生管理系统的表单，上面有N个标签和文本框 文本框里显示的是数据环境里的两个表文件的记录，还有几个个命令按钮，请问各位高手怎么样才能实现：在修改文本框里的内容后，点一个命令按钮，提示是否保存修改？，点是，保存到表文件中，点否，不保存，表单中文本框内显示修改前的记录。
先感谢各位大侠了
那你所说的查询最后都在那显示出来呀

这里我有一个以前编的查询表单，使用者在“编号”文本框内输入编号，即可查到此编号员工的所有信息

被查询的表中有“编号”“姓名”“性别”“出生日期”“工资现状”这5个字段

在表单中：“编号”是text1；“姓名”是text2；“性别”是text3；“出生日期”是text4；“工资现状”是text5.

编写command1的click代码

bh=allt(thisform.text1.value)

set exact on

loca for bh=编号
if found()

thisform.text2.value=姓名
thisform.text3.value=性别
thisform.text4.value=出生日期
thisform.text5.value=工资现状
endif
注意:
如果你的表中字段“编号”是字符型，则bh=allt(thisform.text1.value)
如果你的表中“编号”字段是数值型，则bh=val(thisform.text1.value)

command1只是个查询代码，下面编写command2的click代码

x=messagebox("确定要保存吗?",4+32+256,"确定信息")

if x=6
replace 姓名 with thisform.text2.value
replace 性别 with thisform.text3.value
replace 日期 with thisform.text4.value
replace 工资 with thisform.text5.value
else
thisform.Command1.click
endif

你应该在建一个表单,内容就是你所说的提示是否修改.命名为:tishi
代码command1
do tish