分享方式

Report.TextHeight 方法 (存取)

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 支援與意見反應。

  • Last updated on