在 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 编辑器帮助”。