Указание текста подсказки элемента управления для элементов управления
В следующем примере определяется свойство 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 и обратная связь.