TaskRequestAcceptItem.CustomPropertyChange 事件 (Outlook)
当项目(父对象的一个实例)的自定义属性更改时发生。
语法
expression。 CustomPropertyChange
( _Name_
)
表达 一个代表 TaskRequestAcceptItem 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Name | 必需 | String | 被更改的自定义属性的名称。 |
备注
属性名传递给过程,以便于用户确定哪个自定义属性被更改。
示例
此 Microsoft Visual Basic 脚本版本 (VBScript) 示例使用 CustomPropertyChange 事件启用的控件,如果 Boolean字段设置为 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。