我想请教一下vf的一段查询代码，当输入楼栋号时能查询出楼栋信息，并且显示在下方的表格中，我运行程序时一直提示不能识别的成员text1，我是在页框中写的程序，求帮助，谢谢！




no=alltrim(thisform.Text1.value)
 if thisform.optiongroup1.value=1  
     
if empty(no)      
messagebox("对不起,楼栋号不能为空。",16,"错误")     
thisform.Text1.setfocus     
return     
 endif
 select ldxx      
locate for alltrim(ldxx.楼栋号)=no     
if not found()     
 messagebox("没有找到你输入的楼栋号。",16,"错误")   
  thisform.Text1.setfocus   
 return     
endif      
thisform.Edit1.value="楼栋号"+" "+楼栋号
      thisform.Edit2.value="楼层"+" "+ldxx.楼层
     thisform.Edit3.value="房间数"+" "+ldxx.房间数  

   
 thisform.edit4.value="总人数"+" "+ldxx.总人数   
 return
  endif

要弄清楚表单上各控件的层次

[ 本帖最后由 sdta 于 2014-4-27 10:11 编辑 ]

成员text1，是在表单中还是在页框中？

成员text1，是在表单中  要这样写 no=alltrim(thisform.Text1.value)
在页框中  要这样写 no=alltrim(thisform.pageframe1.page1.Text1.value)

在页框中

表单是第一层
页框1是第二层
页框2是第三层
text1是第四层
写代码一定要注意控件所在的层次，否则就会发生楼主所说的找不到控件的错误

no=alltrim(thisform.pageframe1.page1.pageframe2.page1.Text1.value)
试试这样是否可行。


[ 本帖最后由 sdta 于 2014-4-27 10:09 编辑 ]

嗯   好的

试了代码，提示if thisform.optiongroup1.value=1  中不能识别的成员optiongroup1