主题：在单据保存时，这样判断正在新建的销售订单中的销售明细记录数是否为空对吗

Dim dr As DataRow

dr = DataTables("销售明细").Find("销售订单id = " &  Tables("销售订单").Current("销售订单id"))

If dr IsNot Nothing Then '如果找到的话

    DataTables("销售订单").Save

    DataTables("销售明细").Save

Else

    MessageBox.Show("单据明细不可为空")

End If

此主题相关图片如下：99999.jpg