Tham chiếu từ form lên report

Liên hệ QC

Hoang Nghi

Thành viên mới
Tham gia
18/2/08
Bài viết
6
Được thích
0
Chào các anh chị trong diễn đàn. Em có một vấn đề thế này mong các anh chị giúp đỡ:
Em vừa làm xong một form để lên báo cáo xuất nhập tồn. Trên form này em đã có thông tin báo cáo từ ngày đến ngày.
Bây giờ khi làm report cho báo cáo cho report này, em muốn để thông tin từ ngày đến ngày được xuất hiện tương tự như trên form. Em đã viết câu lệnh tại nút lệnh in ở trên form như sau:
Mã:
Private Sub cmdin_Click()
DoCmd.OpenReport "rptnxt1", acViewPreview
Reports!rptnxt1!txttungay = Me.txttungay
Reports!rptnxt1!txtdenngay = Me.txtdenngay
End Sub
Nhưng khi em nhấn nút in, thì không thấy thông tin từ ngày đến ngày xuất hiện. Chỉ khi em đưa report về dạng design rồi preview lại thì mới thấy thông tin này xuất hiện.
Em đang không biết phải giải quyết thế nào.
Mong các anh chị giúp đỡ. Em cảm ơn
 
Chỉnh sửa lần cuối bởi điều hành viên:
Theo mình thì các Control trên Report là không Edit được. Vậy động thái gán giá trị như bạn là là không được. Bạn phải làm ngược lại.
Đặt 2 Controls Unbound (Txttungay và Txtdenngay)
Control Txttungay nhập =Forms!xxxxx!Txttungay
Và tương tự với Txtdenngay
 
Theo mình thì các Control trên Report là không Edit được. Vậy động thái gán giá trị như bạn là là không được. Bạn phải làm ngược lại.
Đặt 2 Controls Unbound (Txttungay và Txtdenngay)
Control Txttungay nhập =Forms!xxxxx!Txttungay
Và tương tự với Txtdenngay
Oh, Cảm ơn sealand rất nhiều. Đơn giản thế mà em nghĩ không ra.
 
Chào các anh chị trong diễn đàn. Em có một vấn đề thế này mong các anh chị giúp đỡ:
Em vừa làm xong một form để lên báo cáo xuất nhập tồn. Trên form này em đã có thông tin báo cáo từ ngày đến ngày.
Bây giờ khi làm report cho báo cáo cho report này, em muốn để thông tin từ ngày đến ngày được xuất hiện tương tự như trên form. Em đã viết câu lệnh tại nút lệnh in ở trên form như sau:
Mã:
Private Sub cmdin_Click()
DoCmd.OpenReport "rptnxt1", acViewPreview
Reports!rptnxt1!txttungay = Me.txttungay
Reports!rptnxt1!txtdenngay = Me.txtdenngay
End Sub
Nhưng khi em nhấn nút in, thì không thấy thông tin từ ngày đến ngày xuất hiện. Chỉ khi em đưa report về dạng design rồi preview lại thì mới thấy thông tin này xuất hiện.
Em đang không biết phải giải quyết thế nào.
Mong các anh chị giúp đỡ. Em cảm ơn

Hoặc cũng có thể đưa vào sự kiện Activate của report
Mã:
Private Sub Report_Activate()
    Me.txttungay = Forms!xxxx.txttungay
    Me.txtsenngay = Forms!xxxx.txtdenngay
End Sub
 
Web KT
Back
Top Bottom