If e.DataCol.Name = "工种" Then '如果更改的是工种列
If e.DataRow.IsNull("工种") Then '工种是否为空
e.DataRow("单价") = Nothing '如果为空,则清除单价
Else
'否则
e.DataRow("单价") = e.DataRow.GetParentRow("工价")("单价")'从关联父表中的单价列提取单价
End If
End If
If e.DataCol.Name = "计数" Then '如果更改的是计数列
If e.DataRow.IsNull("计数") Then '计数是否为空
e.DataRow("金额") = Nothing '如果为空,则清除金额
Else
'否则
e.DataRow("金额") = ("单价")*("计数")
End If
End If
想实现 更改工种,单价由父表的单价列做相应改变
更改计数,金额列重新计算