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

Статья
04/07/2023

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

Синтаксис

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

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

Параметры

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

См. также

Объект AppointmentItem

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

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

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