anhemnhangu > 19-06-14, 11:17 AM
anhemnhangu > 20-06-14, 03:11 PM
Minh Tiên > 20-06-14, 03:52 PM
Set rs = CurrentDb.OpenRecordset("Q_xacnhan_thunhap")
Private Sub cmdthuchien_Click()
If IsNull(DLookup("[ho]", "Q_xacnhan_thunhap")) = False Then
DoCmd.OpenReport "R_xacnhan_thunhap", acViewPreview, , , acWindowNormal
Else
MsgBox "Khong co du lieu", vbOKOnly, "Thong bao"
End If
End Sub
Between [forms]![F_Xacnhan_thunhap]![txttungay] And [forms]![F_Xacnhan_thunhap]![txtdenngay]
anhemnhangu > 21-06-14, 08:21 AM
Xuân Thanh > 21-06-14, 12:08 PM