表达式用绝对值函数，不执行 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表达式用绝对值函数，不执行

共有3260人关注过本帖树形打印复制链接主题：表达式用绝对值函数，不执行

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/10 14:39:00 [显示全部帖子]

先看看：http://www.foxtable.com/webhelp/topics/0602.htm

然后注意判断一下除数，如果为0，可能会出现无穷大，导致异常

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/10 15:11:00 [显示全部帖子]

iif(IsNull([X_上],0)=IsNull([X_下],0),0,Abs(IsNull([X],0) -(IsNull([X_上],0) +IsNull([X_下],0))/2)/((IsNull([X_上],0) -IsNull([X_下],0))/2) )

有点蓝

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/10 15:46:00 [显示全部帖子]

Dim dr1 As DataRow = e.DataRow

Select Case e.DataCol.Name

Case "标1"

dr1("A6") = dr1("值")/ dr1("D2")

End Select

Select Case e.DataCol.Name

Case "上","下","标1"

dr1("p1") = (dr1("X_上")-dr1("X_下"))/ (6*dr1("A6"))

End Select

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/10 16:38:00 [显示全部帖子]

请上传实例说明

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：109489 积分：557107 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/11 8:57:00 [显示全部帖子]

列表达式没有abs这个用法

iif(IsNull([X_上],0)=IsNull([X_下],0),0,IIF(IsNull([X],0) -(IsNull([X_上],0) +IsNull([X_下],0))/2 > 0,IsNull([X],0) -(IsNull([X_上],0) +IsNull([X_下],0))/2 , (IsNull([X_上],0) +IsNull([X_下],0))/2 - IsNull([X],0))/((IsNull([X_上],0) -IsNull([X_下],0))/2) )

下一主题 >> << 上一主题

主题：表达式用绝对值函数，不执行