Поделиться через


Свойство Page.Background (Visio)

Определяет, является ли страница фоновой. Для чтения и записи.

Синтаксис

expression. Фон

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

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

Целое число

Замечания

Свойство Background всегда должно иметь значение true для страниц разметки.

Пример

В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как выполнить итерацию по страницам документа и определить, является ли страница передней или фоновой. В нем отображаются страницы переднего плана в списке. Чтобы запустить этот макрос, сначала вставьте в проект форму пользователя, содержащую элемент управления list box.

 
Public Sub Background_Example() 
 
 Dim vsoPages As Visio.Pages 
 Dim vsoPage As Visio.Page 
 Dim intCounter As Integer 
 
 'Get the Pages collection. 
 Set vsoPages = ThisDocument.Pages 
 
 'Make sure the list box is cleared. 
 UserForm1.ListBox1.Clear 
 
 'Iterate through the collection. 
 For intCounter = 1 To vsoPages.Count 
 
 'Retrieve the Page object at the current index. 
 Set vsoPage = vsoPages(intCounter) 
 
 'Check whether the current page is a background page. 
 'Display the names of all the foreground pages. 
 If vsoPage.Background = False Then 
 
 UserForm1.ListBox1.AddItem vsoPage.Name 
 
 End If 
 
 Next intCounter 
 
 'Display the user form. 
 UserForm1.Show 
 
End Sub

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

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