主题：行列动态求和判断的问题

datacolchanging事件

if e.datacol.name like "*日" then

dim k as integer = val(e.datacol.name.trim("日"))

dim sum as integer

for i as integer = 1 to k

if e.datatable.datacols.contains(i & "日") then

sum =  sum + e.datarow(i & "日")

end if

next

if sum > e.datarow("未排产数量") then

msgbox("超出")

e.cancel=true

end if

endif