易表在线答疑 → 技术与交流 → 用户社区 → [求助]公式运行出现不对，特请教。


  共有7614人关注过本帖树形打印复制链接

主题：[求助]公式运行出现不对，特请教。
帅哥哟，离线，有人找我吗？
swg-1954
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蝙蝠侠 帖子：820 积分：2154 威望：0 精华：0 注册：2010/5/12 19:07:00 		[求助]公式运行出现不对，特请教。  发帖心情 Post By：2011/11/11 19:27:00 [只看该作者]

详见编辑栏
egd文件下载

 回到顶部
帅哥哟，离线，有人找我吗？
swg-1954
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蝙蝠侠 帖子：820 积分：2154 威望：0 精华：0 注册：2010/5/12 19:07:00 		  发帖心情 Post By：2011/11/11 21:24:00 [只看该作者]

顶

 回到顶部
帅哥哟，离线，有人找我吗？
swg-1954
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蝙蝠侠 帖子：820 积分：2154 威望：0 精华：0 注册：2010/5/12 19:07:00 		  发帖心情 Post By：2011/11/12 15:20:00 [只看该作者]

顶上去

 回到顶部
帅哥哟，离线，有人找我吗？
wjq1072
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：16190 积分：125850 威望：1 精华：0 注册：2006/8/12 12:29:00 		  发帖心情 Post By：2011/11/12 16:02:00 [只看该作者]

顶是没有用的！还得把问题叙述详细一点。

 回到顶部
帅哥哟，离线，有人找我吗？
swg-1954
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蝙蝠侠 帖子：820 积分：2154 威望：0 精华：0 注册：2010/5/12 19:07:00 		  发帖心情 Post By：2011/11/12 16:08:00 [只看该作者]

按钮“查询峰谷不平”里的公式错在何处？

 回到顶部
帅哥哟，离线，有人找我吗？
swg-1954
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：蝙蝠侠 帖子：820 积分：2154 威望：0 精华：0 注册：2010/5/12 19:07:00 		  发帖心情 Post By：2011/11/12 20:38:00 [只看该作者]

这个公式错在那儿？
SetLabel("  ","稍等---") And SortCol("示数类型",1) And SortCol("电能表资产编号",1) And AddCol(Grid,"tt",1, False ) And AddCol(Grid,"pp",3, False ) And EvalFor(Grid,"tt","If(Cell(Row,""示数类型"")=""正有功谷"" And Cell(Row +1,""示数类型"")=""正有功总"" And Cell(Row-1,""示数类型"")=""正有功峰"",Cell(Row+1,""本次示数"")-Cell(Row-1,""本次示数""),"""")") And EvalFor(Grid,"pp","Cell(Row,""示数类型"")=""正有功谷"" And Cell(Row+1,""示数类型"")=""正有功总"" And Cell(Row-1,""示数类型"")=""正有功峰"" And [本次示数] <> [tt]") And If(MinFor(Grid,"pp")=0,MsgBox("峰谷正常!",0),Eval("MsgBox("""+Text(Substitute(ListFor(Grid,"用户编号","pp",-1)+"|","|","用户出错"+Char(13)))+""",0)")) And SetLabel("  ","稍等---") And If(MsgBox("峰谷错误已经查到是否需要筛选出来更改错误？",2,4),EvalFor(Grid,"pp","If(Cell(Row +1,""pp"")=-1,-1,[pp])",1,Rows -1) And EvalFor(Grid,"pp","If(Cell(Row +2,""pp"")=-1,-1,[pp])",2,Rows-1) And FilterFor("pp","=",-1,2), True )And ClearGrid("峰谷不平处理表") And CopyRows("峰谷不平处理表","pp","=",-1) And DelRow("峰谷不平处理表",1) And DeleteCol(Grid,"pp") And DeleteCol(Grid,"tt") And OpenWindow(0) And SetLabel(" ","OK!")

 回到顶部
帅哥哟，离线，有人找我吗？
lyang70
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：5115 积分：862 威望：0 精华：0 注册：2006/8/15 16:57:00 		  发帖心情 Post By：2011/11/15 15:39:00 [只看该作者]

你还是直接描述出你这个按钮要实现的目的吧...

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright ©2002 - 2005 egrid2000.com   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询