Свойство InvisibleApp.Windows (Visio)

  • Статья

Возвращает коллекцию Windows для экземпляра или окна Microsoft Visio. Только для чтения.

Синтаксис

expression. Windows (lpdispRet)

Выражение Переменная, представляющая объект InvisibleApp .

Возвращаемое значение

Windows

Пример

Этот макрос Microsoft Visual Basic получает коллекцию Windows объекта Application и выводит идентификаторы каждого окна в коллекции в окне Интерпретация.

Public Sub Windows_Example() 
 
 Dim vsoApplication As Visio.Application 
 Dim vsoWindows As Visio.Windows 
 Dim intCounter As Integer 
 
 'Get the Windows collection. 
 Set vsoApplication = Application 
 Set vsoWindows = vsoApplication.Windows 
 
 For intCounter = 1 To vsoWindows.Count 
 Debug.Print vsoWindows.Item(intCounter).ID 
 Next intCounter 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.