| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1193 人关注过本帖
标题:请教一段查询代码
取消只看楼主 加入收藏
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
结帖率:50%
收藏
已结贴  问题点数:20 回复次数:7 
请教一段查询代码
我想请教一下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
搜索更多相关主题的帖子: 运行程序 return 找到你 信息 
2014-04-27 09:11
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
回复 3 楼 tlliqi
在页框中
图片附件: 游客没有浏览图片的权限,请 登录注册
2014-04-27 09:49
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
回复 6 楼 sdta
2014-04-27 10:09
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
回复 7 楼 sdta
   好的
2014-04-27 10:09
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
回复 7 楼 sdta
试了代码,提示if thisform.optiongroup1.value=1  中不能识别的成员optiongroup1
2014-04-27 10:18
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
回复 11 楼 tlliqi
就是 确定 那个按钮控件
2014-04-27 10:27
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
我调试了很多次。还是不行,想要实现的功能就是当输入楼栋号后,点击确定按钮,能把查询出来的信息显示在下面的表格中
2014-04-27 10:40
lck
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2014-4-25
收藏
得分:0 
是刚接触这个软件么
2014-04-27 10:44
快速回复:请教一段查询代码
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018584 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved