Crear un archivo con visual basic

Los adjuntos son una propiedad o un método de la clase que usas para obtener los correos del outlook.
¿Qué código estas utilizando?

Hola! Gracias por responder..
Lo que yo debo hacer es contar automáticamente los correos en outlook que van llegando y hacer que en una interfaz de usuario, por cada correo que llegue, cambien de rojo a verde un botón.
Como me habían dicho que los correos que me llegarían con adjuntos, yo hice un programa que halara automáticamente los adjuntos y los guardara en la unidad C. Esto lo hice en el macro de outlook.
Luego en visual basic hice una interfaz de usuario con 17 botones que representan las regiones donde existen cámaras. En la programación de cada botón va lo siguiente:
Private Sub GATUN_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GATUN.Tick
Dim ObjCarpeta1 As Object
Dim Carpeta1 As Object
ObjCarpeta1 = CreateObject("Scripting.FileSystemObject")
Carpeta1 = ObjCarpeta1.GetFolder("C:\reportes-lcd")
CONTADOR2.Text = Carpeta1.files.count
GATUN2.Text = GATUN2.Text + 0.1
If GATUN2.Text = CONSTANTEG.Text Then
If Carpeta1.files.count.ToString = True Then
GATUN1.BackColor = Color.Red
GATUN2.Text = 0
Else
GATUN1.BackColor = Color.LimeGreen
GATUN2.Text = 0
End If
If CONTADOR1.Text > 2 Then
For Each foundFile As String In My.Computer.FileSystem.GetFiles("C:\REPORTES-LCD\GATUN", FileIO.SearchOption.SearchAllSubDirectories, "*.*")
Dim foundFileInfo As New System.IO.FileInfo(foundFile)
My.Computer.FileSystem.MoveFile(foundFile, "C:\REPORTES-USUARIO1\ATLANTICO\GATUN" & foundFileInfo.Name)
Next
End If
End If
End Sub
Ahora, este programa no me sirve a menos que pueda crear documentos automáticamente con el subject como titulo del archivo y el cuerpo del email como contenido del archivo... hay una manera manual de hacerlo, outlook ofrece la opción pero yo debo hacerlo automático porque son cientos y cientos de correos que llegan al email periódicamente...
¿Puedes ayudarme con mi problema?