LogicalToUserFormPoint 方法示例

注意：LogicalToUserFormPoint 方法示例适用于增强型坐标和逻辑坐标。

以下示例将顶部、左侧坐标从以逻辑单位或 postscript 点表示的 30、50 转换为画面TestPicture 的“UserForm 点”坐标。

Dim dTop As Double

Dim dLeft As Double

dTop = 30

dLeft = 50

TestPicture.LogicalToUserFormPoint dTop, dLeft