Foxtable(狐表)用户栏目专家坐堂 → 条件问题


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

主题:条件问题

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
条件问题  发帖心情 Post By:2021/9/10 15:44:00 [只看该作者]

'多条件-
If e.DataCol.Name="实际值" Then            '如果 
'如果"
    If e.NewValue  Is Nothing   Then
        e.DataRow("得分")= Nothing
'如果"       
    ElseIf e.NewValue> Z值 Then                 
        e.DataRow("得分")=120+[(120-100)÷(Z值-D值)×(实际值-Z值)×2] 
'如果"       
    ElseIf e.NewValue= Z值 Then                 
        e.DataRow("得分")=120

ElseIf e.NewValue < Z值 Or e.NewValue > D值 Then                 
        e.DataRow("得分")=100+[(120-100)÷(Z值-D值)×(实际值-Z值)] 
  
 '如果"            
    ElseIf e.NewValue = D值 Then
        e.DataRow("得分")=100

''否则,       
    Else
        e.DataRow("得分")=100-[(120-100)÷(Z值-D值)×(实际值-Z值)×2] 
    End If
End If


上面代码报错,提示“未声明Z值 ”,ElseIf e.NewValue> Z值 Then 

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


加好友 发短信
等级:狐精 帖子:3051 积分:20414 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2021/9/10 16:02:00 [只看该作者]

对的,Z值没声明变量啊?系统不知道Z值是什么东西,Z值、D值、实际值,都不知道是什么啊?

你应该是这个意思吧?

e.DataRow("得分")=120+((120-100)÷(e.DataRow("Z值")-e.DataRow("D值"))×(e.DataRow("实际值")-e.DataRow("Z值")×2)

[此贴子已经被作者于2021/9/10 16:04:00编辑过]

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2021/9/10 16:16:00 [只看该作者]

是的,我试一下,谢谢

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2021/9/10 16:22:00 [只看该作者]

'多条件-
If e.DataCol.Name="实际值" Then            '如果 
'如果"
    If e.NewValue  Is Nothing   Then
        e.DataRow("得分")= Nothing
'如果"       
    ElseIf e.NewValue> Z值 Then                 
        e.DataRow("得分")=120+((120-100)÷(e.DataRow("Z值")-e.DataRow("D值"))×(e.DataRow("实际值")-e.DataRow("Z值")×2)
'如果"       
    ElseIf e.NewValue= Z值 Then                 
        e.DataRow("得分")=120

ElseIf e.NewValue < Z值 Or e.NewValue > D值 Then                 
        e.DataRow("得分")=100+((120-100)÷(e.DataRow("Z值")-e.DataRow("D值"))×(e.DataRow("实际值")-e.DataRow("Z值")×2)
  
 '如果"            
    ElseIf e.NewValue = D值 Then
        e.DataRow("得分")=100

''否则,       
    Else
        e.DataRow("得分")=100-((120-100)÷(e.DataRow("Z值")-e.DataRow("D值"))×(e.DataRow("实际值")-e.DataRow("Z值")×2)
    End If
End If
还是报错,上面代码报错,提示“未声明Z值 ”,ElseIf e.NewValue> Z值 Then 

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


加好友 发短信
等级:超级版主 帖子:106142 积分:539827 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 16:27:00 [只看该作者]

Z值是一个变量名称?还是一个字符串?还是列名?

如果是列名
ElseIf e.NewValue> e.DataRow("Z值") Then   

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2021/9/10 16:38:00 [只看该作者]

1,“Z值、D值、实际值” 都是列名
2,下面代码,报错提示:" 120+((120-100)÷(dr("Z值")-dr("D值"))×(dr("实际值")-dr("Z值")×2) ",为应结束语句?
Dim dr As DataRow = e.DataRow

If e.DataCol.Name="实际值" Then            '如果
    '如果"
    If e.NewValue  Is Nothing   Then
        dr("得分")= Nothing
        '如果"
    ElseIf e.NewValue> "Z值" Then
        dr("得分")= " 120+((120-100)÷(dr("Z值")-dr("D值"))×(dr("实际值")-dr("Z值")×2) "
        
    ElseIf e.NewValue= "Z值" Then
        dr("得分")="120"
        
    ElseIf e.NewValue < "Z值" Or e.NewValue > "D值" Then
        dr("得分")="100+((120-100)÷(dr("Z值")-dr("D值"))×(dr("实际值")-dr("Z值")×2)"
        
        
    ElseIf e.NewValue ="D值" Then
        dr("得分")="100"
        
        ''否则,
    Else
        dr("得分")="100-((120-100)÷(dr("Z值")-dr("D值"))×(dr("实际值")-dr("Z值")×2)"
    End If
End If


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


加好友 发短信
等级:超级版主 帖子:106142 积分:539827 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 16:52:00 [只看该作者]

ElseIf e.NewValue> dr("Z值") Then
        dr("得分")= 120+((120-100)÷(dr("Z值")-dr("D值"))×(dr("实际值")-dr("Z值")×2) 

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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2021/9/10 17:38:00 [只看该作者]

还是报错,计算不出得分的值
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多条件1.foxdb


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


加好友 发短信
等级:超级版主 帖子:106142 积分:539827 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/9/10 17:43:00 [只看该作者]


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


加好友 发短信
等级:五尾狐 帖子:1152 积分:7712 威望:0 精华:0 注册:2019/6/13 9:57:00
  发帖心情 Post By:2021/9/10 22:05:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:多条件1 - 副本.foxdb


老师,方法一,计算出来还有问题
1,编号4,5的计算的值是错,如果计算出”得分“的值与”正确答案数据“的值一样?
2,计算出来”得分“的值大于130,取130,小于0,取0,如何实现?
3,使用方法二,不执行,是哪里错?


注:计算公式方法已在”备注栏“写清楚。

 回到顶部
总数 14 1 2 下一页