表A中当前库存是由表B(关联表)统计而来,以下代码在表A的DataColChanged中设置
Dim v As Double = Val(e.NewValue)
Dim b As Double = e.DataRow("仓存上限")If e.DataCol.Name = "当前仓存" Then If v > b Then MessageBox.Show("超过库存上限,请控制采购") End If
Dim c As Double = e.DataRow("仓存下限") If v < c Then MessageBox.Show("低于库存上限,请赶紧采购") End IfEnd If
不能正常报警,我知道"当前仓存"不能触发DataColChanged事件,特寻求解决方案
附件传不上来