以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]根据评分自动评价的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=74486)

--  作者:jwt
--  发布时间:2015/9/12 8:15:00
--  [求助]根据评分自动评价的问题
试了好久还是提示错误,向大神求助!附图!
想要的效果如下:我在【得分列】输入内容,【评价列】自动根据得分所属区间给出评价~
以【评价】为优秀为例,【得分】区间为[90<A<=100]。
求大神给写一下代码~
我把代码写在了表的datacolchanged属性中
图片点击可在新窗口打开查看此主题相关图片如下:测评.png
图片点击可在新窗口打开查看

--  作者:jwt
--  发布时间:2015/9/12 8:52:00
--  
没人么??帖子要沉?
--  作者:y2287958
--  发布时间:2015/9/12 9:06:00
--  
上例子
其实用表达式就好
[此贴子已经被作者于2015/9/12 9:06:46编辑过]

--  作者:Hyphen
--  发布时间:2015/9/12 10:32:00
--  

Select Case e.DataCol.Name
    Case "得分"
        If e.NewValue > 90 AndAlso e.NewValue <= 100 Then
            e.DataRow("评价") = "优秀"
        Else If e.NewValue > 80 AndAlso e.NewValue <= 90 Then
            e.DataRow("评价") = "优良"
        Else
            e.DataRow("评价") = "其它"
        End If
       
End Select

 

表达式列这样用 :IIF([得分]  <= 100 and [得分] > 90,\'优秀\',IIF([得分]  <= 90 and [得分] > 80,\'优良\',\'其它\'))