Write some Software

PROJECT: Provide VB code that will retrieve and display information from the currently-selected email or appointment. - I am building an Outlook Add-in with Visual Studio 2013 and Add-in-Express. - I have already created regions for email and appointments / meetings. - I need a simple code example that demonstrates how to do the following - Assume the add-in region is displayed and active, and it shows up in both Explorer and Inspector views. The code example must do the following: When a user clicks on an item: 1) Determine if the item is an appointment or email 1.1) If appointment, display the Duration in one label (aka label1) contained in the add-in region, display the Meeting Status in another label on the region (aka label2). I have included a MeetingStatus function below that may help 1.2 If item is an email, display Subject in a label in the region (label3) and display the time received in another label in the region (label 4). Function AppointmentMeetingStatus(appt As [login to view URL], _ Optional mtgStatus As OlMeetingStatus) As OlMeetingStatus Select Case mtgStatus Case olMeeting, olMeetingCanceled, olMeetingReceived, olNonMeeting [login to view URL] = mtgStatus Case Else AppointmentMeetingStatus = [login to view URL] End Select End Function