与之相关的有：If e.DataCol.Name="fusj"
If e.DataRow("扶贫数据") Like "贫困*" And (e.DataRow("扶贫数据") Like "*2014*" Or e.DataRow("扶贫数据") Like "*2015*")=False Then
e.DataRow("pklx_sjbd")="建档立卡贫困户"
End If
If (e.DataRow("扶贫数据") Like "贫困*")=False And (e.DataRow("民政数据") Like "*低保*" Or e.DataRow("民政数据") Like "*特困*")
e.DataRow("pklx_sjbd")=e.DataRow("民政数据")
End If
If e.DataRow("扶贫数据")="NULL" And (e.DataRow("民政数据") Like "*低保*" Or e.DataRow("民政数据") Like "*特困*")=False And e.DataRow("残联数据") Like "*残疾*" Then
e.DataRow("pklx_sjbd")="残疾学生"
End If
If e.DataRow("扶贫数据") Like "*2014*" Then
If e.DataRow("rxsj") Like "2016*"
e.DataRow("sfscyhzz")=False
Else
e.DataRow("pklx_sjbd")="2014年贫困退出户"
e.DataRow("sfscyhzz")=True
e.DataRow("tpnd")="2014年"
End If
End If
If e.DataRow("扶贫数据") Like "*2015*" Then
If e.DataRow("rxsj") Like "2017*"
e.DataRow("sfscyhzz")=False
Else
e.DataRow("pklx_sjbd")="2015年贫困退出户"
e.DataRow("sfscyhzz")=True
e.DataRow("tpnd")="2015年"
End If
End If
If e.DataRow("扶贫数据")="NULL" And e.DataRow("残联数据")="NULL" And e.DataRow("民政数据") Like "低收入*" Then
e.DataRow("pklx_sjbd")=e.DataRow("民政数据")
End If
If e.DataRow("扶贫数据")="NULL" And e.DataRow("残联数据")="NULL" And e.DataRow("民政数据")="NULL" And e.DataRow("工会数据")<> "NULL" Then
' e.DataRow("pklx_sjbd")=e.DataRow("工会数据")
e.DataRow("pklx_sjbd")="建档困难职工家庭子女"
End If
End If
但同是这些代码，手动点击重置列：扶贫数据，却能达到目的
[此贴子已经被作者于2020/2/3 21:05:12编辑过]
加好友 
发短信
Post By：2020/2/2 0:53:00 [显示全部帖子]
