Application.LinesToPoints 方法 (Publisher)

將度量單位從線條轉換為 點 (1 行 = 12 點) 。 會傳回以 單一 轉換後的度量單位。

語法

運算式。LinesToPoints (值)

expression 代表 Application 物件的變數。

參數

名稱	必要/選用	資料類型	描述
值	必要	Single	要轉換成點數的行值。

傳回值

單一

註解

這個方法會假設以 12 點的線條進行度量;出版物中任何文字的實際大小不會影響轉換因數。

使用 PointsToLines 方法可將度量單位從點轉換成行。

範例

本範例將度量單位從行轉換成點，證明目前選取範圍中的字型大小與轉換因素沒有任何關係。 目前出版物中必須選取一些文字，然後本範圍才有作用。

Dim strOutput As String 
 
' Set text size to 10 points. 
Selection.TextRange.Font.Size = 10 
 
' Display result for one line of text. 
strOutput = "1 line = " _ 
 & Format(Application _ 
 .LinesToPoints(Value:=1), _ 
 "0.00") & " points"

支援和意見反應

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