anhtuan > 06-09-19, 05:55 PM
ongke0711 > 06-09-19, 07:16 PM
tranthanhan1962 > 06-09-19, 09:20 PM
Private Sub NutIn_Click()
DoCmd.OpenReport "r_HOADON", acViewNormal ' Lệnh in
DoCmd.OpenReport "r_HOADON", acViewPreview 'Lệnh xem
End Sub
tranthanhan1962 > 06-09-19, 09:21 PM
Private Sub NutIn_Click()
DoCmd.OpenReport "r_HOADON", acViewNormal ' Lệnh in
DoCmd.OpenReport "r_HOADON", acViewPreview 'Lệnh xem
End Sub
ongke0711 > 06-09-19, 09:30 PM
(06-09-19, 09:20 PM)tranthanhan1962 Đã viết: Được chứ ongke0711
Mã:Private Sub NutIn_Click()
DoCmd.OpenReport "r_HOADON", acViewNormal ' Lệnh in
DoCmd.OpenReport "r_HOADON", acViewPreview 'Lệnh xem
End Sub
Ra lệnh in (acViewNormal) trước để cho nó in, ra lệnh xem (acViewPreview) sau để trong khi nó in thì xem cho đã, xem xong thì đóng report lại. Cũng có thể đưa lệnh in vào event Report_Close, xem cho đã chừng nào đóng report thì nó sẽ in