主题：最后一行定位

Select Case e.Col.Name
    Case "物料名称", "规格型号"
        Dim dr As Row = Table("辅料表").find ("[物料名称]='" & e.Row("物料名称") & "'  and  [规格型号] ='" & e.Row("规格型号") & "',"[_SortKey] Desc"  )
        If dr.Row("安全库存") > dr.Row("库存数量") Then
        e.Style = "安全库存"
                End If
        
                End Select

 

 

此主题相关图片如下：411.png

我想实现如果现库存数量低于安全库存会有一个提醒 这样写对不对    这块不敢轻易尝试  弄不好就死循环了  还请大神帮着看一下

此主题相关图片如下：5739.png

这个一开始我写的就是这样的   但是我这个表是做的流水账  所以只想对具体的产品最后一行才有显示   因为报警后会有进料的