通过

Application.PointsToCentimeters 方法 (Word)

  • 项目

将度量单位从磅转换为厘米 (1 厘米 = 28.35 磅)。 返回已转换为一个 单一 测量。

语法

expression。 PointsToCentimeters( _Points_ )

expression：表示“Application”对象的变量。 可选。

参数

名称 必需/可选 数据类型 说明
Points 必需 Single 以磅为单位的度量值。

返回值

单精度

示例

以下示例将 30 磅的度量值转换为相应的厘米值。

MsgBox PointsToCentimeters(30) & " centimeters"

此示例将变量 sngData 的值 (以磅) 的度量转换为厘米、英寸、线条、毫米或毕加，具体取决于变量 intUnit 的值 (一个从 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。