| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1252 人关注过本帖
标题:VFP 查询统计求教
只看楼主 加入收藏
changke119
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2012-7-6
结帖率:50%
收藏
已结贴  问题点数:20 回复次数:11 
VFP 查询统计求教
请大家帮我看看这个编程有什么问题,我也是从网上下载下来的,自己稍微改改名称,其他查询还好,就是统计的时候,统计不准确,有时候统计是正确的,有时候统计是不正确,不知道什么原因啊,还有查询工号、时间什么经常会出现日期的格式,不知怎么回事,代码如下:




if thisform.grid1.recordsource='临时培训记录'
   thisform.grid1.recordsource='培训记录'
endif'
private CXTJ
if empty() or empty() ;
   or empty(thisform.text1.value) && 判断列表框和文本框是否为空
    messagebox('请输入完整条件!',16,'系统提示')
   
else
  do case
    case alltrim()='时间'
     CXTJ=alltrim();     
     +' '+alltrim();
     +' '+alltrim(thisform.text1.value)
    case alltrim()='工号'
     CXTJ=alltrim();     
     +' '+alltrim();
     +' '+alltrim(thisform.text1.value)
    otherwise
     CXTJ=alltrim();     
     +' '+alltrim();
     +' "'+alltrim(thisform.text1.value)+'"'
  endcase
  Select * from 培训记录 where &CXTJ. into cursor 临时培训记录
  thisform.grid1.recordsource='临时培训记录'
  thisform.grid1.backcolor=rgb(200,224,248)
  sele 临时培训记录
  thisform.text2.value=reccount()
     sum(时间) to thisform.text3.value
     aver(时间) to thisform.text4.value
endif
搜索更多相关主题的帖子: 统计 private 文本框 
2012-07-17 10:02
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:2 
有时正确,有时不正确,你觉得贴代码有用吗?抄人的代码不要紧,但最起码自己要学会调试,否则别抄。

授人以渔,不授人以鱼。
2012-07-17 14:19
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:3 
以下是引用changke119在2012-7-17 10:02:11的发言:

请大家帮我看看这个编程有什么问题,我也是从网上下载下来的,自己稍微改改名称,其他查询还好,就是统计的时候,统计不准确,有时候统计是正确的,有时候统计是不正确,不知道什么原因啊,还有查询工号、时间什么经常会出现日期的格式,不知怎么回事,代码如下:




if thisform.grid1.recordsource='临时培训记录'
   thisform.grid1.recordsource='培训记录'
endif'
private CXTJ
if empty() or empty() ;
   or empty(thisform.text1.value) && 判断列表框和文本框是否为空
    messagebox('请输入完整条件!',16,'系统提示')
   
else
  do case
    case alltrim()='时间'
     CXTJ=alltrim();     
     +' '+alltrim();
     +' '+alltrim(thisform.text1.value)
    case alltrim()='工号'
     CXTJ=alltrim();     
     +' '+alltrim();
     +' '+alltrim(thisform.text1.value)
    otherwise
     CXTJ=alltrim();     
     +' '+alltrim();
     +' "'+alltrim(thisform.text1.value)+'"'
  endcase
  Select * from 培训记录 where &CXTJ. into cursor 临时培训记录
  thisform.grid1.recordsource='临时培训记录'
  thisform.grid1.backcolor=rgb(200,224,248)
  sele 临时培训记录
  thisform.text2.value=reccount()
     sum(时间) to thisform.text3.value
     aver(时间) to thisform.text4.value
endif
时间:是什么概念,数据类型是什么。
'时间'???
工号:应该是字符型
'工号'???

坚守VFP最后的阵地
2012-07-18 02:12
changke119
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2012-7-6
收藏
得分:0 
时间其实就是个数字,因为我是为了统计培训的时间,所以我输入的是30,45这样的数字, 工号的也是数字,比如112或者115
2012-07-18 16:18
changke119
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2012-7-6
收藏
得分:0 
比如我的上面显示是这样的

姓名  工号   课程名称  时间   月份  评价
A     101    计算机    30     7月份  
B     102    化学      40     5月份  
A     101    化学      40     6月份  一般

查询条件 comb01  combo2  text1

符合条件数  ________   总时间 __________  平均时间  __________
  查询                           退出

如果我点击查询姓名=A是 显示结果如下

姓名  工号   课程名称  时间   月份  评价
A     101    计算机    30     7月份  
A     101    化学      40     6月份  一般

但符合条件数仍然是 3    总时间  80    平均时间  40  这是为什么,然后如果你查询按照工号=101的话,在TEXT1中要求你输入的格式是按照时间来填入的,请高手帮我一下。

2012-07-18 16:28
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:5 
以下是引用changke119在2012-7-18 16:28:26的发言:

比如我的上面显示是这样的

姓名  工号   课程名称  时间   月份  评价
A     101    计算机    30     7月份  
B     102    化学      40     5月份  
A     101    化学      40     6月份  一般

查询条件 comb01  combo2  text1

符合条件数  ________   总时间 __________  平均时间  __________
  查询                           退出

如果我点击查询姓名=A是 显示结果如下

姓名  工号   课程名称  时间   月份  评价
A     101    计算机    30     7月份  
A     101    化学      40     6月份  一般

但符合条件数仍然是 3    总时间  80    平均时间  40  这是为什么,然后如果你查询按照工号=101的话,在TEXT1中要求你输入的格式是按照时间来填入的,请高手帮我一下。
数据表结构?
字符串比较?

[ 本帖最后由 sdta 于 2012-7-18 16:48 编辑 ]

坚守VFP最后的阵地
2012-07-18 16:43
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:5 
以下是引用changke119在2012-7-18 16:18:23的发言:

时间其实就是个数字,因为我是为了统计培训的时间,所以我输入的是30,45这样的数字, 工号的也是数字,比如112或者115
答非所问,无语
数字是什么数据类型?基础掌握不好,什么也不要做

[ 本帖最后由 sdta 于 2012-7-18 16:51 编辑 ]

坚守VFP最后的阵地
2012-07-18 16:49
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:5 
需要先补基础,搞清字段的类型、字段宽度、表结构、指针、指针位置、表结构与代码的协调……等等概念

只求每天有一丁点儿的进步就可以了
2012-07-19 11:31
昔日无知
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2012-7-9
收藏
得分:0 
时间其实就是个数字

http://6699.tv 最新电影
2012-07-20 17:51
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
在IT人的眼里,世界上所有的事物都可以转化成数字的形式表达。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2012-07-20 20:04
快速回复:VFP 查询统计求教
数据加载中...
 
   



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

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