表事件:AFTEREDIT
Dim Val As Integer = e.Table.Current("剩余课时")If Val = 0 ThenMessageBox.Show("已无剩余课时, 可以下山了!", "提示") ElseIf Val = 1 ThenMessageBox.Show("仅剩最后一课时,请与学员家长联系续费.", "提示")ElseIf Val < 2 ThenMessageBox.Show("剩余" & Val & "课时" & ", 已扣除本次课时.", "提示")End If
错误:执行后修改全表任何一个单元格都会弹出提示框,
应该是指定列下单元格发生变动才提示。
是哪里出了错误?