GetDeviceRect方法示例
2015-12-15 22:24:39   来源：   评论：0 点击：

下列示例获得 对象Oval1矩形边界的点，单位为设备坐标。

Dim dTop As Long

Dim dLeft As Long

Dim dBottom As Long

Dim dRight As Long

Oval1.GetDeviceRect dTop, dLeft, dBottom, dRight