Foxtable(狐表)用户栏目专家坐堂 → [求助]这个表达式如何写?


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

主题:[求助]这个表达式如何写?

帅哥哟,离线,有人找我吗?
黄训良
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1100 积分:8985 威望:0 精华:0 注册:2014/3/15 14:36:00
[求助]这个表达式如何写?  发帖心情 Post By:2016/10/26 11:27:00 [只看该作者]

取双眼视力差的绝对值,下面的表达式报错,请指点!

Dim dr As DataRow = e.DataRow
Dim dt As DataTable =DataTables("体检表")
If e.DataCol.Name = "班级" And dr.IsNull("班级") = False Then

    dr("视力_视力参差_轻度") = dt.Compute("Count(姓名)", "[班级_部门] = '" & dr("班级") & "' and (Math.Abs([视力_左眼] - [视力_右眼]) > 2 )")
End If


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110554 积分:562660 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/10/26 12:15:00 [只看该作者]

表达式没有绝对值函数

试试

dr("视力_视力参差_轻度") = dt.Compute("Count(姓名)", "[班级_部门] = '" & dr("班级") & "' and iif(([视力_左眼] - [视力_右眼]) >= 0,[视力_左眼] - [视力_右眼],([视力_左眼] - [视力_右眼])*-1) > 2 )")

 回到顶部
帅哥哟,离线,有人找我吗?
黄训良
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1100 积分:8985 威望:0 精华:0 注册:2014/3/15 14:36:00
  发帖心情 Post By:2016/10/28 13:26:00 [只看该作者]

感谢!可以了,代码如下:

dr("视力_视力参差_轻度") = dt.Compute("Count(姓名)", "[班级_部门] = '286' And iif(([视力_左眼] - [视力_右眼]) >= 0,[视力_左眼] - [视力_右眼],[视力_右眼] - [视力_左眼]) > 0.2")


 回到顶部