主题：关于同步删除关联行的问题

我用订单表关联了生产安排，想同步删除关联的行，试了多次为什么不好用呢！！ 

If e.DataRow.GetChildRows("生产安排").Count > 0 Then
    Dim s As String = "此订单存生产安排, 是否确定要删除此订单吗?"
    If MessageBox.Show(s,"提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.No
        e.Cancel= True
    End If
End If