Report.Print 方法 (Access)

Print 方法會使用目前的色彩和字型在報表物件上列印文字。

語法

運算式。列印 (運算式)

運算式 代表 Report 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Expr 必要 String 若要列印之字串運算式。 如果省略此引數,則 Print 方法會列印一個空白列。 多個運算式可以與一個空格、 分號 (;) 或以逗號區隔。 空格的效果為分號。

傳回值

無

註解

只有在由區段的 OnPrint 事件屬性設定所指定的事件程序或巨集中使用此方法。

Expr 引數指定的運算式會從 CurrentX 和 CurrentY 屬性設定所指出的位置開始列印在物件上。

列印 Expr 引數時,通常會附加歸位字元,讓下一個 Print 方法開始在下一行列印。 發生歸位時, CurrentY 屬性設定會因 Expr 引數的高度而增加, (與 TextHeight 方法) 傳回的值相同,同時將 CurrentX 屬性設定為 0。

當 Expr 引數後面加上分號時,不會附加歸位字,下一個 Print 方法會列印在目前 Print 方法列印的同一行上。 CurrentX 和 CurrentY 屬性設定為點之後的最後一個字元列印。 如果本身 Expr引數包含換行字元,每一個這類內嵌的歸位會設定 CurrentX 和 CurrentY 屬性的 Print 方法沒有分號所述。

當逗號接在 Expr 引數後面時, CurrentX 和 CurrentY 屬性會設定為同一行上的下一個列印區域。

在 Report 物件上列印 Expr 引數時,無法放進指定位置的行不會捲動。 文字被裁剪以配合物件。

因為 Print 方法通常會列印使用依比例含空格的字元,務必記住沒有相互關聯的列印的字元數與的固定寬度資料行數目之間佔用這些字元。 例如,(例如 W) 整體字母所佔多個固定寬度] 欄中,而窄的字母 (例如 i) 佔用更少。 您應該確定表格式欄的位置相距足夠遠,以容納要列印的文字。 您也可以使用固定字寬字型來列印 (例如 Courier),以確保每一個字元只使用一個欄位。

範例

下列範例會使用 Print 方法來顯示名為 Report1 報表上的文字。 它會使用 TextWidth 和 TextHeight 方法來垂直和水平置中的文字。

Private Sub Detail_Format(Cancel As Integer, _ 
 FormatCount As Integer) 
 Dim rpt as Report 
 Dim strMessage As String 
 Dim intHorSize As Integer, intVerSize As Integer 
 
 Set rpt = Me 
 strMessage = "DisplayMessage" 
 With rpt 
 'Set scale to pixels, and set FontName and 
 'FontSize properties. 
 .ScaleMode = 3 
 .FontName = "Courier" 
 .FontSize = 24 
 End With 
 ' Horizontal width. 
 intHorSize = Rpt.TextWidth(strMessage) 
 ' Vertical height. 
 intVerSize = Rpt.TextHeight(strMessage) 
 ' Calculate location of text to be displayed. 
 Rpt.CurrentX = (Rpt.ScaleWidth/2) - (intHorSize/2) 
 Rpt.CurrentY = (Rpt.ScaleHeight/2) - (intVerSize/2) 
 ' Print text on Report object. 
 Rpt.Print strMessage 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。