我在"补偿计算表"的Datacolchanged 事件中加入如下代码,用于实现:当实际安置面积大于可安置面积(超证面积)时,超证部分分段填入相关字段,运行后,没用反应,请问如何修改?请指教,谢谢!
Select Case e.DataRow("超证面积")
Case e.DataRow("超证面积")>0 And e.DataRow("超证面积")<15
e.DataRow("超证15平以内面积") = e.DataRow("主房总安置面积")-e.DataRow("可安置面积")
e.DataRow("超证15至30平面积") =0
e.DataRow("超证30平以上面积") =0
Case e.DataRow("超证面积")>15 And e.DataRow("超证面积")<30
e.DataRow("超证15平以内面积") = 15
e.DataRow("超证15至30平面积") = e.DataRow("主房总安置面积")-e.DataRow("可安置面积")-15
e.DataRow("超证30平以上面积") =0
Case e.DataRow("超证面积")>30
e.DataRow("超证15平以内面积") = 15
e.DataRow("超证15至30平面积") = 15
e.DataRow("超证30平以上面积") =e.DataRow("主房总安置面积")-e.DataRow("可安置面积")-30