以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  BUG收集  (http://foxtable.net/bbs/list.asp?boardid=12)
----  条件代码部分不执行,请指导,谢谢  (http://foxtable.net/bbs/dispbbs.asp?boardid=12&id=175089)

--  作者:lgz518
--  发布时间:2022/2/19 12:37:00
--  条件代码部分不执行,请指导,谢谢
下面代码,红字代码不执行,如何处理,谢谢

If e.DataCol.Name="成绩" Then            

    If e.NewValue  Is Nothing   Then
        e.DataRow("等级")= Nothing
\'如果"成绩">= 105的条件,"等级"字段列=("A")        
    ElseIf e.NewValue>= 105 Then                 
        e.DataRow("等级")=("A")
     
 \'如果95<="成绩" <105的条件,"等级"字段列=("B")             
    ElseIf e.NewValue >= 95 Or e.NewValue < 105 Then
        e.DataRow("等级")=("B")

 \'如果85<="成绩" <95的条件,"等级"字段列=("C")             
    ElseIf e.NewValue >= 85 Or e.NewValue < 95 Then
        e.DataRow("等级")=("C")

\'如果70<="成绩" <85的条件,"等级"字段列=("D")        
    ElseIf e.NewValue >= 70 Or e.NewValue < 85  Then
        e.DataRow("等级")=("D")

\'如果"成绩" <70的条件,等级"字段列=("E")     
   
    Else
        e.DataRow("等级")=("E")
    End If
End If