Application.PointsToLines 方法 (Publisher)

将度量值从 磅 转换为) (1 行 = 12 磅的线条。 转换后的度量单位以 Single 类型返回。

语法

表达式。PointsToLines (Value)

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。