How to send email from VB 2015 using Outlook?

I am trying to send e-mail from a 2015 VB app and am having trouble.  I have basically copied code from the MSDN web site for VB 2013 and later.  I could not find 2015 specific code.

The problem I have is  .CreateItem nor .Session are members of Application.  I fell like I have left something out, but not sure what.

I have added as references Microsoft Office 10. Object Library and Microsoft Outlook 15.0 Object Library.
I have included the import in my project.
   Imports Outlook = Microsoft.Office.Interop.Outlook

    
Private Sub SendSalesReport()
        Dim mail As Outlook.MailItem = CType(Application.CreateItem(
            Outlook.OlItemType.olMailItem), Outlook.MailItem)
        mail.Subject = "Quarterly Sales Report FY06 Q4"
        Dim currentUser As Outlook.AddressEntry =
            Application.Session.CurrentUser.AddressEntry
        If currentUser.Type = "EX" Then
            Dim manager As Outlook.ExchangeUser =
                currentUser.GetExchangeUser().GetExchangeUserManager()
            ' Add recipient using display name, alias, or smtp address
            mail.Recipients.Add(manager.PrimarySmtpAddress)
            mail.Recipients.ResolveAll()
            mail.Send()
        End If
    End Sub

Select allOpen in new window