子表DataColChanging事件
If e.DataCol.Name = "第一列" AndAlso e.NewValue <> Nothing Then
If e.DataRow.GetParentRow("表A") Is Nothing Then
msgbox("没有父编码")
e.Cancel = True
End If
加好友 
发短信
Post By：2015/11/8 20:16:00 [显示全部帖子]
