vfp表单中保存代码是什么?

vfp中做表单时，怎么把text里的东西保存住？

2024-12-28 23:58:22

推荐回答（2个）

回答1：

查询按钮的简要程序(无索引情况)如下：Select Classlocate for 班级号==alltrim(Thisform.text1.Value)if found()thisform.text2.value=Class.班级名thisform.text3.value=Class.班长名thisform.text4.value=Class.班主任名elsemessagebox('未找到！',48,'系统提示！')endif有索引情况（假设班级号为主索引），程序可写成：if INDEXSEEK(alltrim(Thisform.text1.Value),.T.,'Class','班级号')thisform.text2.value=Class.班级名thisform.text3.value=Class.班长名thisform.text4.value=Class.班主任名elsemessagebox('未找到！',48,'系统提示！')endif

回答2：

STRTOFILE()
从TXT目标文件中读取文本内容到字符变量

FILETOSTR
将字符变量写入到TXT目标文件中

具体格式在VFP9的功能中有提示，就不再细说了。