老师您好!下面一段代码是在表事件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
我的“工程合同基础数据”(父表)是动态分页加载的,如果我先加载父表对应的主合同记录,上面代码没问题,但是在子表中做记录很多时候没有加载父表对应的记录,所以会出现红色的提示,而且不予保存。
请问一下老师有什么其他办法?如果每次都要加载父表数据速度会很慢,因为我的项目中设置了加载主表同时会加载所有子表记录。
谢谢老师!