Событие MailItem.CustomPropertyChange (Outlook)

Происходит при изменении пользовательского свойства элемента (который является экземпляром родительского объекта).

Синтаксис

выражение. CustomPropertyChange( _Name_ )

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
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

См. также

Объект MailItem

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

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