Height property example

Sub Height_Example()
    Dim iHeight As Integer
    iHeight = ThisDrawing.Application.Height
    MsgBox ("Height (in pixels) is : " & iHeight)
End Sub
Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. Copyright © 2001- Menhirs NV - All rights reserved.