打開AdmForm
對話框模式迫使AdmReport
的Report_Open
程序等,而用戶在Admform
輸入日期值。
我AdmForm
包括一個名爲cmdOK
一個命令按鈕,它的Click事件重新打開隱藏模式,它允許AdmReport
的Report_Open
程序繼續形式。雖然AdmForm
隱時現,它的文本框,它們包含將提供給AdmQuery
(用於AdmReport
記錄源)的值。
下面是命令按鈕的Click事件中的代碼。
Private Sub cmdOK_Click()
DoCmd.OpenForm Me.Name, acNormal, , , , acHidden
End Sub
這裏是我的版本的AdmReport
後面的代碼。我使用Access 2007進行了測試,但相信它也可以與Access 2003一起使用。
Option Compare Database
Option Explicit
Const mcstrForm As String = "AdmForm"
Private Sub Report_Close()
DoCmd.Close acForm, mcstrForm
End Sub
Private Sub Report_Open(Cancel As Integer)
DoCmd.OpenForm mcstrForm, acNormal, , , , acDialog
End Sub
通知中,我有一個AdmReport
程序Report_Close()
。目的只是關閉(現在隱藏)AdmForm
。
它往往是離開的形式公開和隱藏的,我覺得很有用,因爲在同一日期可用於各種報告或再次打印相同的報告。當然這取決於應用程序。 – Fionnuala 2012-07-08 09:12:24
謝謝你們,讓我試試這個,我會盡快回復你! – 2012-07-09 20:54:35
Perfecto !!!!!! – 2012-07-18 12:54:15