| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1319 人关注过本帖
标题:叶框按钮
只看楼主 加入收藏
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
结帖率:0
收藏
已结贴  问题点数:20 回复次数:10 
叶框按钮
我是新手,正在做一个表单,表单的过程如下:
1 表单上有一个文本框、一个命令按钮、一个叶框
2 过程:在文本框中输入姓名,在几个不同的表中查找相应的内容
3 表有4个,分别是员工基本情况、员工简历、奖惩记录、社会关系
4 大概格局如下图
  
搜索更多相关主题的帖子: 叶框 按钮 
2009-07-23 10:21
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
叶框按钮
图片发不上去
大概图是在不同的page中显示文本框中的相关内容,不同的page对应不同的表内容,可是只用一个按钮

要求:查找按钮的click事件能完成所有page的内容显示
2009-07-23 10:28
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
请高手帮忙,谢谢
2009-07-23 10:29
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
简单点就是 如何使一个按钮控制拥有5个页面的叶框显示相关内容
2009-07-23 15:05
panpende
Rank: 8Rank: 8
等 级:蝙蝠侠
威 望:4
帖 子:528
专家分:963
注 册:2009-4-27
收藏
得分:6 
使一个按钮控制拥有5个页面的叶框显示相关内容 ,如果是随机的或者是依次轮流的,应该是可用控制的。用RAND()命令或者DO CASE 命令可以实现。
2009-07-24 13:53
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:6 
将按钮添加在表单中而不要添加到页框中。在按钮中写入语句,对每个页框进行刷新即可达到要求。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2009-07-24 20:27
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
按钮中写入语句,能不能给点提示,用什么语句?都是哪些语句的组合?
2009-07-31 10:30
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
你需要达到什么目的就选用合适的语句,一条语句无法达到目的就用多条语句来实现。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2009-08-01 08:32
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
if empty(thisform.Text1.value)=.f.
   locate for 姓名=alltrim(thisform.text1.value)
  if found ()
     select 姓名 from 员工基本情况.dbf where 姓名==alltrim(thisform.Text1.value) into array aa
     thisform.Pageframe1.Page1.text1.value=aa(1)
     select 性别 from 员工基本情况.dbf where 姓名==alltrim(thisform.Text1.value) into array ab
     thisform.Pageframe1.Page1.text2.value=ab(1)  
  else
     messagebox("数据库中不存在您所要查询的记录",16,"系统提示")
     thisform.Text1.refresh
     return
  endif
else
  messagebox("请输入要查找的内容!",16,"系统提示")
  thisform.Text1.value=""
  thisform.Text1.Setfocus
endif
USE f:\kugou\人事管理系统\员工简历
locate for 姓名=alltrim(thisform.text1.value)
if found ()
   select 参加工作时间 from 员工简历.dbf where 姓名==alltrim(thisform.Text1.value) into array ba
   thisform.Pageframe1.Page2.text1.value=ba(1)
   select 工龄 from 员工简历.dbf where 姓名==alltrim(thisform.Text1.value)into array bb
   thisform.Pageframe1.Page2.text2.value=bb(1)
   select 用工形式 from 员工简历.dbf where 姓名==alltrim(thisform.Text1.value) into array bc
   thisform.Pageframe1.Page2.text3.value=bc(1)
endif
return
2009-08-06 07:29
巫一天
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2009-7-23
收藏
得分:0 
我在查询中写了如上的语句,可是好像是分成两次查询的了
第一次查询中第一个页面可以显示,可是第二个页面就不行
第二次查询变成没有记录了,也就是连第一个页面都不能完成任务
请帮我解释下好吗?
2009-08-06 07:32
快速回复:叶框按钮
数据加载中...
 
   



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

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