Outlook VBA教程:UserProperties属性

返回UserProperties集合,代表 Outlook 项目的所有用户属性。

expression.UserProperties

expression  必选。该表达式返回“应用于”列表中的一个对象。

VBA示例

本 VBScript 示例在某个 Boolean 字段设置为 True 时使用CustomPropertyChange事件来启用控件。

本示例在窗体的第二页创建了两个自定义字段。第一个字段是名为“RespondBy”的 Boolean 字段。第二个字段名为“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

上页:Outlook VBA教程:UserCertificate属性 下页:Outlook VBA教程:UseWordMail属性

Outlook VBA教程:UserProperties属性:相关链接

Outlook VBA教程:UseWordMail属性 Outlook VBA教程:ValidationFormula属性
Outlook VBA教程:ValidationText属性 Outlook VBA教程:Value属性
Outlook VBA教程:Version属性 Outlook VBA教程:Views属性
Outlook VBA教程:ViewType属性 Outlook VBA教程:Visible属性
Outlook VBA教程:VotingOptions属性 Outlook VBA教程:VotingResponse属性
Outlook VBA教程:WebPage属性 Outlook VBA教程:WebViewOn属性
Outlook VBA教程:WebViewURL属性 Outlook VBA教程:Width属性
Outlook VBA教程:WindowState属性 Outlook VBA教程:WordEditor属性
Outlook VBA教程:XML属性 Outlook VBA教程:YomiCompanyName属性
Outlook VBA教程:YomiFirstName属性 Outlook VBA教程:YomiLastName属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号