Windows property example

Private Sub WindowspropertyExample()

Dim myDoc As Document

Dim nowins As Integer

nowins = Application.Windows.Count

MsgBox "No. of windows = " & nowins

End Sub

Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. © 2001- Menhirs NV - All rights reserved.