老师您好！下面一段代码是在表事件BeforeSaveDataRow
If e.DataRow.IsNull("主合同编号") = False Then
Dim pr As DataRow = e.DataRow.GetParentRow("工程合同基础数据") '获得此应收款记录对应的主合同
If pr IsNot Nothing Then '如果有对应的主合同
执行代码...
Else
e.Cancel = True '那么取消保存并提示用户
Messagebox.Show("该记录主合同编号有误,请核对修改后保存!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End if
Else
e.Cancel = True '那么取消保存并提示用户
Messagebox.Show("主合同编号不能为空,请填入正确的主合同编号后保存!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
我的“工程合同基础数据”（父表）是动态分页加载的，如果我先加载父表对应的主合同记录，上面代码没问题，但是在子表中做记录很多时候没有加载父表对应的记录，所以会出现红色的提示，而且不予保存。
请问一下老师有什么其他办法？如果每次都要加载父表数据速度会很慢，因为我的项目中设置了加载主表同时会加载所有子表记录。
谢谢老师！
加好友 
发短信
Post By：2019/5/28 18:33:00 [只看该作者]
Post By：2019/5/28 20:47:00 [只看该作者]
