为啥个人缴费信息表加载不成功呢?
If e.DataCol.Name = "证照号码" OrElse e.DataCol.name = "月份" Then
If DataTables.Contains("个人缴费信息") = False Then
DataTables("个人缴费信息").load()
End If
If e.DataRow.IsNull("证照号码") OrElse e.DataRow.IsNull("月份") Then
e.DataRow("基本养老保险费") = Nothing
e.DataRow("基本医疗保险费") = Nothing
e.DataRow("失业保险费") = Nothing
Else
Dim dr As DataRow = DataTables("个人缴费信息").find("证照号码 = '"& e.datarow("证照号码") & "'and 年份 = '"& e.datarow("年份") & "'and 月份 = '"& e.datarow("月份") & "'")
If dr IsNot Nothing Then
e.DataRow("基本养老保险费") = dr("个人月缴纳养老保险费")
e.DataRow("基本医疗保险费") = dr("个人月缴纳医疗保险费")
e.DataRow("失业保险费") = dr("个人月缴纳失业保险费")
End If
End If
End If
加好友 
发短信
Post By：2019/7/10 7:27:00 [显示全部帖子]
