Publisher) (Application.PointsToLines 方法

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

語法

運算式。PointsToLines (值)

expression 代表 Application 物件的變數。

參數

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

傳回值

單一

註解

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

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

範例

此範例會將以點為單位的度量單位轉換成線條的度量，示範目前選取範圍中的字型大小與轉換因數無關。 目前出版物中必須選取一些文字，然後本範圍才有作用。

Dim strOutput As String 
 
' Set text size to 10 points. 
Selection.TextRange.Font.Size = 10 
 
' Display result for 12 points. 
strOutput = "12 points = " _ 
 & Format(Application _ 
 .PointsToLines(Value:=12), _ 
 "0.00") & " lines"

支援和意見反應

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