Visual Basic.NET - Recibir correo electronico

Hola.
Para enviar correos electronicos, utilizo el siguiente codigo:

Mi_Email = Mi_Mensajero.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem)
Mi_Inspector = Mi_Email.GetInspector()
'
Mi_Email.Subject = AsuntoMail
Mi_Email.Body = CuerpoMail
Mi_Email.To = EmailDestino
Mi_Email.Attachments.Add("C:\Carta.pdf", 0, 0)
Mi_Email.Send()

El problema, es que no consigo hacer que me reciba correo, utilizando el siguiente codigo:

If Mi_Email.UnRead Then

Nombre = Mi_Email.SenderName
Nombre = Mi_Email.Subject
Nombre = Mi_Email.ReceivedTime
Nombre = Mi_Email.Body
End If

Con el codigo anterior, puedo recibir correos electronicos, pero no consigo recibir los adjunto, para guardarlos.

¿Puede alguien darme una idea?

Gracias
Un saludo