Outlook VBA教程:在 Visual Basic 编辑器中处理窗体

可以使用 Visual Basic 编辑器设计窗体,以允许用户与 Microsoft Visual Basic for Applications 程序交互。与Outlook 窗体不同的是,Visual Basic for Applications 窗体不用于显示 Outlook 项目,也不能将 Visual Basic for Applications 窗体上的控件绑定到项目字段。

Visual Basic for Applications 程序可以使用 Visual Basic for Applications 用户窗体来收集用户的信息;然后程序可以使用该信息设置新的或现有 Outlook 项目的属性。例如,创建邮件样板文件的程序可以使用 Visual Basic for Applications 窗体,以允许用户为要发送的邮件输入特定信息。当用户关闭该窗体时,程序使用窗体中的信息设置邮件的属性并发送邮件。

以下示例使用两个文本框中的文本在发送邮件前将信息添加到邮件中。


Private Sub CommandButton1_Click()
    Dim myMail As Outlook.MailItem
    Set myMail = Application.CreateItem(olMailItem)
    With myMail
        .To = TextBox1.Text
        .Subject = "Book overdue: " & TextBox2.Text
        .Body = "Please return this book as soon as possible."
    End With
    myMail.Send
End Sub

也可以使用控件显示有关 Outlook 项目、文件夹和 Outlook对象模型其他特性的信息。下例说明如何将用户收件箱中的项目主题填写到组合框控件中。


Dim myItems As Outlook.Items
Set myItems = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Items
For x = 1 To myItems.Count
    ComboBox1.AddItem myItems.Item(x).Subject
Next x

有关在 Visual Basic 编辑器中创建和使用窗体的详细信息,请参阅“Visual Basic 编辑器帮助”。

上页:Outlook VBA教程:使用 EntryID 和 StoreID 下页:Outlook VBA教程:处理 Outlook事件

Outlook VBA教程:在 Visual Basic 编辑器中处理窗体:相关链接

Outlook VBA教程:处理 Outlook事件 Outlook VBA教程:编写 Outlook 宏
Outlook VBA教程:Activate事件 Outlook VBA教程:AdvancedSearchComplete事件
Outlook VBA教程:AdvancedSearchStopped事件 Outlook VBA教程:AttachmentAdd事件
Outlook VBA教程:AttachmentRead事件 Outlook VBA教程:BeforeAttachmentSave事件
Outlook VBA教程:BeforeCheckNames事件 Outlook VBA教程:BeforeDelete事件
Outlook VBA教程:BeforeFolderSwitch事件 Outlook VBA教程:BeforeGroupAdd事件
Outlook VBA教程:BeforeGroupRemove事件 Outlook VBA教程:BeforeGroupSwitch事件
Outlook VBA教程:BeforeItemCopy事件 Outlook VBA教程:BeforeItemCut事件
Outlook VBA教程:BeforeItemPaste事件 Outlook VBA教程:BeforeMaximize事件
Outlook VBA教程:BeforeMinimize事件 Outlook VBA教程:BeforeMove事件
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号