resta > 15-05-20, 12:15 PM
ongke0711 > 17-05-20, 06:40 PM
Private Sub Ma_VC_BeforeUpdate(Cancel As Integer)
If Not IsNull(Me.Ma_VC) Then
Me.txtSLMuon = Nz(DLookupNumberWrapper("[Tong_SL]", "B_Xuatmuon_Chitiet", "[Ma_VC] = " & Me.Ma_VC & " AND [Ma_XM] =" & Me.Parent.Ma_XM))
Else
eh.TryToRunCommand acCmdDeleteRecord
End If
End Sub