Example to create an e-mail message in Outlook.

Private Sub CreateMailItem()
      Dim objItem As Outlook.MailItem = _
            Me.CreateItem(Outlook.OlItemType.olMailItem)
      objItem.Subject = "Hello Author"
      objItem.To = "aboutus@authorcode.com"
      objItem.Body = "Hello Author, i want to contact you"
      objItem.Importance = Outlook.OlImportance.olImportanceLow
      objItem.Display(False)
End Sub