主题：非关联删除

生产订单表与订单工序表不关联，如果删除了生产订单里面的行，如何同时删除订单工序表里面所有关于该生产单号的行

Dim dr As DataRow = DataTables("订单工序").Find("生产单号 = '" & e.DataRow("生产单号") & "'")
If dr IsNot Nothing Then
    dr.Delete()
End If

以上生产订单DataRowDeleting代码只能删除订单工序里面的一行，请求如何删除所有相同生产单号的行