返回代表数据访问页电子邮件标题的 MsoEnvelope 对象。
expression.MailEnvelope
expression 必需。返回“Applies To”列表中的一个对象的表达式。
该示例为指定的数据访问页的电子邮件标题设置注释。
Dim envDAP As MsoEnvelope
Set envDAP = DataAccessPages(0).MailEnvelope
envDAP.Introduction = _
    "Please review this report and let me know " & _
    "what you think. I need your input by Friday. " & _
    "Thanks."