打印照片窗體

我使用VBA來顯示從文件，而不是插入我的表格細節（即設置訪問圖像控件的Picture屬性）的虛擬圖像畫面，使用：打印照片窗體

Private Sub Form_Current() 
On Error Resume Next 
Me![imgFromFile].Picture = Me![txtPath] 
End Sub

這在屏幕上顯示單個表單時運行良好，將圖像從「txtpath」中定義的文件位置更新爲適當的圖片。

但是，當我嘗試打印所有表單（連續）時，我只能得到與上次顯示在單獨窗體顯示中相同的圖像。

是否有任何方法可以在打印之前更新每個對象的圖像域？

On Error Resume接下來是應該只使用很少的東西。它拋棄了所有的錯誤，而且你不知道你是忽略了正確的還是忽略了重要的東西。 – 2010-11-09 23:03:13

表單用於顯示和編輯數據，報表用於打印。

2010-11-09 13:34:34 Fionnuala

感謝雷蒙我意識到這一點。但是我的'客戶'想要打印所有表單（無論出於何種原因！）。我已經制作了一份報告，其中給出了相同的結果。但是，非常感謝您的輸入 Wilkie53 – 2010-11-09 15:53:40

@Steve Wilkie在您的客戶中獲得中世紀:) – Fionnuala 2010-11-09 23:04:36

您是否試過以下代碼。它將打印出現在屏幕上的表單。

DoCmd.SelectObject acForm, "MyFormName", True 
DoCmd.RunCommand acCmdPrint

2016-06-21 07:37:19

回答