Report.TextHeight 方法 (Access)
TextHeight方法會傳回文字字串的高度,如同以Report物件的目前字型列印一樣。
語法
運算式。TextHeight (Expr)
表達 代表 Report 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
Expr | 必要 | 字串 | 決定文字高度的文字字串。 |
傳回值
單一
註解
使用 TextHeight 方法來判斷格式化和列印報表時,文字字串在目前字型中需要的垂直空間量。 例如,以 9 點 Arial 格式化的文字字串會需要不同於其中一個格式 12 點 Courier 的空間量。 若要判斷目前的字型和字型大小報表中的文字,請檢查報表的 字型名稱 及 FontSize 屬性的設定。
TextHeight方法所傳回的值會以報表作用中的座標系統表示,如Scale方法所定義。 使用 ScaleMode 屬性來判斷報表目前作用中的座標系統。
如果 StrExpr 引數 包含內嵌歸位字元傳回, TextHeight 方法會傳回行的累計高度,包括每一行上方和下方的前置空格。 使用 TextHeight 方法傳回的值來計算報表內多行文字的必要空間和位置。
範例
下列範例使用 TextHeight 和 TextWidth 方法,來決定以報表的現用字型列印文字字串時,所需要的垂直和水平的空間。
若要在 Microsoft Access 中嘗試此範例,請建立一個新報表。 將詳細資料區段的 OnPrint 屬性設定為 [事件程序]。 在報表的模組中輸入下列程式碼,然後切換至 [預覽列印]。
Private Sub Detail_Print(Cancel As Integer, _
PrintCount As Integer)
' Set unit of measure to twips (default scale).
Me.Scalemode = 1
' Print name and font size of report font.
Debug.Print "Report Font: "; Me.FontName
Debug.Print "Report Font Size: "; Me.FontSize
' Print height and width required for text string.
Debug.Print "Text Height (Twips): "; _
Me.TextHeight("Product Report")
Debug.Print "Text Width (Twips): "; _
Me.TextWidth("Product Report")
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應