以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  动态提示  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=193665)

--  作者:13775189031
--  发布时间:2024/10/1 13:16:00
--  动态提示
请教老师:第一段代码有什么问题?输入值大于上偏差,没有提示,但第二段输入值小于下偏差,有动态提示!

If e.DataCol.name = "实测偏差_肢宽mm" Then
    If e.DataRow("实测偏差_肢宽mm") > e.DataRow("允许偏差_肢宽mm_上偏差") Then
        e.DataRow.SetError("实测偏差_肢宽mm", "不能大于上偏差!")
    Else
        e.DataRow.SetError("实测偏差_肢宽mm","")
    End If
End If

If e.DataCol.name = "实测偏差_肢宽mm" Then
    If e.DataRow("实测偏差_肢宽mm") < e.DataRow("允许偏差_肢宽mm_下偏差") Then
        e.DataRow.SetError("实测偏差_肢宽mm", "不能小于下偏差!")
    Else
        e.DataRow.SetError("实测偏差_肢宽mm","")
    End If
End If


--  作者:有点蓝
--  发布时间:2024/10/5 20:32:00
--  
If e.DataCol.name = "实测偏差_肢宽mm" Then
    If e.DataRow("实测偏差_肢宽mm") > e.DataRow("允许偏差_肢宽mm_上偏差") Then
        e.DataRow.SetError("实测偏差_肢宽mm", "不能大于上偏差!")
    ElseIf e.DataRow("实测偏差_肢宽mm") < e.DataRow("允许偏差_肢宽mm_下偏差") Then
        e.DataRow.SetError("实测偏差_肢宽mm", "不能小于下偏差!")
    Else
        e.DataRow.SetError("实测偏差_肢宽mm", "")
    End If
End If