問題:
連續或者單個窗體,如何打印當前顯示的記錄?當前窗體還有對應的子窗體,也要一起打印出來
我在一個窗體里有一個單號,大子窗體里有幾組數據,我的報表是一組數據一頁,請問如何實現按一下打印,能夠只打印當前單號的數據報表?
回答:
這個問題太簡單,我就不另外做說明了,請去看羅斯文示例數據庫的“訂單”窗體上“打印發貨單”按鈕的單擊事件的代碼
http://access911.net/down/eg/northwind2003.rar
http://access911.net/down/eg/northwind97.rar
以下為引用的內容: Sub 打印發貨單_Click() ' 這段代碼由“命令按鈕向導”創建。 On Error GoTo Err_PrintInvoice_Click Dim strDocName As String strDocName = "發貨單" ' 打印“發貨單”報表,使用“發貨單篩選”查詢打印當前訂單的發貨單。 DoCmd.OpenReport strDocName, acViewNormal, "發貨單篩選" Exit_PrintInvoice_Click: Exit Sub Err_PrintInvoice_Click: ' 如果用戶取消操作,不顯示錯誤消息。 Const conErrDoCmdCancelled = 2501 If (Err = conErrDoCmdCancelled) Then Resume Exit_PrintInvoice_Click Else MsgBox Err.Description Resume Exit_PrintInvoice_Click End If End Sub |
這里的DoCmd.OpenReport strDocName, acViewNormal, "發貨單篩選"的"發貨單篩選"參數是一個查詢的名稱,該查詢代碼如下:
SELECT 發貨單.*
FROM 發貨單
WHERE (((發貨單.訂單ID)=Forms!訂單!訂單ID));
請去參考一下 OpenReport 的語法,在 ACCESS 幫助里面有。
新聞熱點
疑難解答