Foxtable(狐表)用户栏目专家坐堂 → [求助]逻辑列


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

主题:[求助]逻辑列

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
[求助]逻辑列  发帖心情 Post By:2018/9/29 17:45:00 [显示全部帖子]

逻辑列如何显示为及格,不及格
当成绩>60逻辑列自动显示为及格
当成绩<60逻辑列自动显示为不及格
这个如何写

如果不好搞, 那么下面设计如何写

A列数值>60,则B列自动填写合格
A列数值<60,则B列自动填写不合格

[此贴子已经被作者于2018/9/29 17:53:45编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/9/30 8:49:00 [显示全部帖子]

谢谢!现在不想用逻辑列, 现在用两个数据列, A列和B列
A列数值>60,则B列自动填写合格
A列数值<60,则B列自动填写不合格
如何写?

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/2 17:08:00 [显示全部帖子]

如果A列数值>60<80,则B列自动填写良好
A列数值<60,则B列自动填写一般
A列数值>80,则B列自动填写优秀
代码如何写?

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/2 18:07:00 [显示全部帖子]

老师看看前面的代码是否影响后面的代码呢?
Dim cs1 = e.DataRow("cs1")
Dim ood1 = e.DataRow("ood1")
Dim oid2 = e.DataRow("oid2")
Dim oysl1 = e.DataRow("oysl1")
If cs1 <> Nothing Then
    SystemReady = False
    e.DataRow("oysl1") = (cs1-(ood1-oid2)/2)/cs1
    SystemReady = True
End If

If e.DataCol.name = "oysl1"
e.DataRow("判断") = IIF(e.newvalue>0.14,"过高",iif(e.newvalue >= 0.08, "正常","过低"))
End If

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/2 18:13:00 [显示全部帖子]

还是不行

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/2 18:14:00 [显示全部帖子]

列子正常, 放在系统里就不行了
去掉上面的公式代码,代码正常
就是这段代码
Dim cs1 = e.DataRow("cs1")
Dim ood1 = e.DataRow("ood1")
Dim oid2 = e.DataRow("oid2")
Dim oysl1 = e.DataRow("oysl1")
If cs1 <> Nothing Then
    SystemReady = False
    e.DataRow("oysl1") = (cs1-(ood1-oid2)/2)/cs1
    SystemReady = True
End If
[此贴子已经被作者于2018/11/2 18:18:42编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/3 9:10:00 [显示全部帖子]

谢谢老师!OK了,
如果A列数值>60<80,则B列自动填写优秀, 不在这个范围内就填写一般
代码如何写?

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/3 9:34:00 [显示全部帖子]

如果代码SystemReady = false/true,不能去除,想保留, 如何更改代码?

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2018/11/3 10:26:00 [显示全部帖子]

谢谢老师, OK了
[此贴子已经被作者于2018/11/3 10:28:09编辑过]

 回到顶部