先说情况，在学习VF中，看了好几个人的程序，都是用表格GRID来显示查询（查询程序，额，也可以说是查找吧，非SQL查询）结果，
就是输入一个编号然后“确定” 然后有 GRID来显示结果---  不能用TXET文本框来显示吗？

下面是我写的代码，这是表单FORM 在  INIT 时运行的， 不过提示找不到变量 bianhao
LOCAL bianhao(10)
SCAN
*thisform.txt编号.Value =ALLTRIM(cx)
SELECT 姓名 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (bianhao)
thisform.txt编号 .value = array(bianhao)
RETURN
ENDSCAN
*thisform.refresh


让它在LOAD也不行          ，，，，       CX是我在别的表单上集成过来的数据，是用户输入的编号   （额，东西的思路是  表单1输入 编号，点击“确定”，跳到表单2 ，表单2就显示  编号所对应的记录）

GRID 不好看（不美观，但很直观）啊，兄弟们，   为什么都喜欢用GRID来显示呢？

试了一下 SET FILTER TO  再刷新也不行，
用2个表单是用户要求-------，，，，俺其实爱那个用GRID显示结果，，可是----

用帮助文件我试过，主要是无法确定要搜索内容的关键字，搜过 “文本框”，“EDIT”，“控件”，  都没什么明确的结果---
我目前主要靠  百度 和 论坛的提示，以及查看别人做好的系统的代码来 做，，，
唉

左边的ForM是用户输入编号用的， 点击”查询“”， 弹出右面的FORM并显示相应的结果，与用户输入数据相对应的记录。再单击“确定”就再次返回左边的FORM

在百度上看到别人说可以直接讲筛选出来的结果直接赋给文本    比如  thisform.txt姓名.value = cxjg（筛选的结果送给变量），我吧这个写在FORM的INIT事件里，结果---------

[ 本帖最后由 uhjiok123 于 2014-7-5 20:40 编辑 ]

这是我比着别人写的，  我原来是用 SELE 表名   “条件”   thisform。GRID1.刷新

主要是不会用文本框显示，  原来我想试着 满足条件后 刷新整个FORM ，后来发现不行-000 00

SORRY  SORRY   有点崩溃了， 很没有头绪，所以有点雨雾轮次了9-----

我是想用 满足筛选的条件后，  FORM刷新，来显示对应的数据

个人感觉不好看，但用作 信息总浏览的时候比较不错， 很直观

*********定义本地数组以存放数据***********
LOCAL xingming(10) 
LOCAL [bianhao(10)]
LOCAL [shenfenzheng(20)]
LOCAL xingbie(10)  
LOCAL [jiashizheng(20)] 
LOCAL [chusheng(20)] 
LOCAL gongzuo(20)
LOCAL [zhiwu(20)] 
LOCAL [jianli(200)]


**************************给各个文本框赋值，满足条件的值*****************
thisform.refresh
SELECT 编号 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (bianhao)
thisform.txt编号 .value = bianhao
SELECT 姓名 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (xingming)
thisform.txt姓名.value= xingming
SELECT 性别 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (xingbie)
thisform.txt性别 .value = xingbie
SELECT 身份证编号 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (shenfenzheng)
thisform.txt身份证编号 .value = shenfenzheng
SELECT 驾驶证编号 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (jiashizheng)
thisform.txt驾驶证编号 .value = jiashizheng
SELECT 出生日期 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY (chusheng)
thisform.txt出生日期 .value =chusheng
SELECT 工作日期 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY  (gongzuo)
thisform.txt工作日期 .value = gongzuo
SELECT 简历 FROM rsb WHERE 编号=ALLTRIM(cx) INTO ARRAY jianli
thisform.edt简历 .value = jianli
***********************************赋值，结束********************************** 

我用了一种最笨的办法  现在了第2个表单的 INIT 事件中