共用方式為


Word) (Application.PointsToMillimeters 方法

會將度量單位從點轉換成公釐 (1 公釐 = 2.835 點)。 會傳回以 單一 轉換後的度量單位。

語法

expressionPointsToMillimeters( _Points_ )

expression 代表 Application 物件的變數。 選用。

參數

名稱 必要/選用 資料類型 描述
Points 必要 Single 以點數表示的度量。

傳回值

單一

範例

這個範例會將 72 點轉換成對應的公釐數。

MsgBox PointsToMillimeters(72) & " millimeters"

本範例會根據 intUnit 變數的值,將變數 sngData 的值 (以) 為公分、英吋、線條、公釐或 picas 的度量值, (1 到 5 的值來表示所產生的度量單位) 。

Function ConvertPoints(ByVal intUnit As Integer, _ 
 sngData As Single) As Single 
 
 Select Case intUnit 
 Case 1 
 ConvertPoints = PointsToCentimeters(sngData) 
 Case 2 
 ConvertPoints = PointsToInches(sngData) 
 Case 3 
 ConvertPoints = PointsToLines(sngData) 
 Case 4 
 ConvertPoints = PointsToMillimeters(sngData) 
 Case 5 
 ConvertPoints = PointsToPicas(sngData) 
 Case Else 
 Error 5 
 End Select 
 
End Function

另請參閱

Application 物件

支援和意見反應

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