日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

解析ACCESS如何打印窗體中當(dāng)前顯示的記錄_Access數(shù)據(jù)庫(kù)教程

編輯Tag賺U幣
教程Tag：暫無Tag,歡迎添加,賺取U幣!

推薦：怎樣為Access數(shù)據(jù)庫(kù)表添加日期或時(shí)間戳
為了應(yīng)用方便，您可能需要給數(shù)據(jù)庫(kù)的每條記錄都添加日期/時(shí)間戳，以便確定各個(gè)記錄添加到數(shù)據(jù)庫(kù)的時(shí)間。在Access數(shù)據(jù)庫(kù)應(yīng)用中，使用Now()函數(shù)能夠輕松完成這個(gè)任務(wù)。本文將一步一步為

問題：

連續(xù)或者單個(gè)窗體，如何打印當(dāng)前顯示的記錄？當(dāng)前窗體還有對(duì)應(yīng)的子窗體，也要一起打印出來

我在一個(gè)窗體里有一個(gè)單號(hào),大子窗體里有幾組數(shù)據(jù),我的報(bào)表是一組數(shù)據(jù)一頁,請(qǐng)問如何實(shí)現(xiàn)按一下打印,能夠只打印當(dāng)前單號(hào)的數(shù)據(jù)報(bào)表？

回答：

這個(gè)問題太簡(jiǎn)單，我就不另外做說明了，請(qǐng)去看羅斯文示例數(shù)據(jù)庫(kù)的“訂單”窗體上“打印發(fā)貨單”按鈕的單擊事件的代碼

http://access911.net/down/eg/northwind2003.rar
http://access911.net/down/eg/northwind97.rar

以下為引用的內(nèi)容：
Sub 打印發(fā)貨單_Click()
' 這段代碼由“命令按鈕向?qū)?rdquo;創(chuàng)建。
On Error GoTo Err_PrintInvoice_Click
　　
　　Dim strDocName As String
　　strDocName = "發(fā)貨單"
　　' 打印“發(fā)貨單”報(bào)表，使用“發(fā)貨單篩選”查詢打印當(dāng)前訂單的發(fā)貨單。
　　DoCmd.OpenReport strDocName, acViewNormal, "發(fā)貨單篩選"
　　
Exit_PrintInvoice_Click:
　　Exit Sub
　　
Err_PrintInvoice_Click:
　　' 如果用戶取消操作，不顯示錯(cuò)誤消息。
　　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, "發(fā)貨單篩選"的"發(fā)貨單篩選"參數(shù)是一個(gè)查詢的名稱，該查詢代碼如下：

SELECT 發(fā)貨單.*

FROM 發(fā)貨單

WHERE (((發(fā)貨單.訂單ID)=Forms!訂單!訂單ID));

請(qǐng)去參考一下 OpenReport 的語法，在 ACCESS 幫助里面有。

分享：如何使用Access創(chuàng)建一個(gè)簡(jiǎn)單MIS管理系統(tǒng)
你家中的CD、VCD一定很多吧？是不是常遇到為找一張CD把一抽屜的碟子翻得亂七八糟的情況，你一定沒少受埋怨——你不想整理它們一下？如：影片是國(guó)產(chǎn)的、還是國(guó)外的，是言情

來源：模板無憂//所屬分類：Access數(shù)據(jù)庫(kù)教程/更新時(shí)間：2009-05-25
相關(guān)Access數(shù)據(jù)庫(kù)教程：