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


Указание текста подсказки элемента управления для элементов управления

В следующем примере определяется свойство ControlTipText для трех элементов управления CommandButton и двух объектов Page в MultiPage.

Примечание Элемент управления CommandButton Microsoft Forms 2.0 содержит свойство ControlTipText.

Чтобы использовать этот пример, скопируйте пример кода в редактор скриптов формы. Чтобы запустить код, необходимо открыть форму, чтобы активировать событие Open . Убедитесь, что эта форма содержит:

  • Элемент MultiPage с именем MultiPage1.

  • Три элемента управления CommandButton с именами от CommandButton1 до CommandButton3.

Примечание Для отдельной страницыMultiPagecontrolTipText становится включенным, если фокус находится на элементе Управления MultiPage или элементе управления на текущей странице MultiPage .

Sub Item_Open() 
 Set MultiPage1 = Item.GetInspector.ModifiedFormPages("P.2").MultiPage1 
 Set CommandButton1 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton1 
 Set CommandButton2 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton2 
 Set CommandButton3 = Item.GetInspector.ModifiedFormPages("P.2").CommandButton3 
 
 MultiPage1.Page1.ControlTipText = "Here in page 1" 
 MultiPage1.Page2.ControlTipText = "Now in page 2" 
 
 CommandButton1.ControlTipText = "And now here's" 
 CommandButton2.ControlTipText = "a tip from" 
 CommandButton3.ControlTipText = "your controls!" 
End Sub

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

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