在DataTables("身份证籍贯编码")是外部表,设置初始不加载表,在员工信息表的DataColChanged中设置如下代码: 籍贯编码出不来?,恢复到原来不是动态加载模式时又正常了
此主题相关图片如下:步骤一.png
Select Case e.DataCol.name
Case "身份证"
If e.DataRow.IsNull("身份证") Then
e.DataRow("籍贯") = Nothing
Else
Dim bm As String = e.DataRow("身份证").SubString(0,6)
Dim dr As DataRow = DataTables("身份证籍贯编码").sqlFind("籍贯编码 = '" & bm & "'")
If dr IsNot Nothing Then
e.DataRow("籍贯") = dr("籍贯")
End If
End If
End Select