If Tables("出库总表").Current IsNot Nothing Then
If MessageBox.Show("是否删除?","请确认",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
Tables("出库总表").Current.Delete
'Tables("出库明细表").DeleteFor = "领用单号 = '" & Tables("出库总表").Current("领用单号")&"' "
'DataTables("出库明细表").save
DataTables("出库总表").save
End If
End If
请教一下，我要删除总表数据的同时，也要删除该订单的明细表，写了上面的代码，可是红色部分的代码执行不了，请老师指导一下
加好友 
发短信
Post By：2018/3/3 23:45:00 [显示全部帖子]
