Событие ReportItem.CustomPropertyChange (Outlook)
Происходит при изменении пользовательского свойства элемента (который является экземпляром родительского объекта).
Синтаксис
выражение. CustomPropertyChange
( _Name_
)
Выражение Переменная, представляющая объект ReportItem .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Name | Обязательный | String | Имя пользовательского свойства, которое было изменено. |
Замечания
Имя свойства передается процедуре, чтобы можно было определить, какое пользовательское свойство было изменено.
Пример
В этом примере Microsoft Visual Basic Scripting Edition (VBScript) используется событие CustomPropertyChange для включения элемента управления, если логическое поле имеет значение True.
В этом примере создайте два настраиваемых поля на второй странице формы. Первое, логическое поле, называется "RespondBy". Второе поле называется DateToRespond.
Sub Item_CustomPropertyChange(ByVal myPropName)
Select Case myPropName
Case "RespondBy"
Set myPages = Item.GetInspector.ModifiedFormPages
Set myCtrl = myPages("P.2").Controls("DateToRespond")
If Item.UserProperties("RespondBy").Value Then
myCtrl.Enabled = True
myCtrl.Backcolor = 65535 'Yellow
Else
myCtrl.Enabled = False
myCtrl.Backcolor = 0 'Black
End If
Case Else
End Select
End Sub
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.