共用方式為


Report.TextHeight 方法 (Access)

TextHeight方法會傳回文字字串的高度,如同以Report物件的目前字型列印一樣。

語法

運算式TextHeight (Expr)

表達 代表 Report 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Expr 必要 字串 決定文字高度的文字字串。

傳回值

單一

註解

使用 TextHeight 方法來判斷格式化和列印報表時,文字字串在目前字型中需要的垂直空間量。 例如,以 9 點 Arial 格式化的文字字串會需要不同於其中一個格式 12 點 Courier 的空間量。 若要判斷目前的字型和字型大小報表中的文字,請檢查報表的 字型名稱FontSize 屬性的設定。

TextHeight方法所傳回的值會以報表作用中的座標系統表示,如Scale方法所定義。 使用 ScaleMode 屬性來判斷報表目前作用中的座標系統。

如果 StrExpr 引數 包含內嵌歸位字元傳回, TextHeight 方法會傳回行的累計高度,包括每一行上方和下方的前置空格。 使用 TextHeight 方法傳回的值來計算報表內多行文字的必要空間和位置。

範例

下列範例使用 TextHeightTextWidth 方法,來決定以報表的現用字型列印文字字串時,所需要的垂直和水平的空間。

若要在 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 支援與意見反應