VB, send en .txt fil via mail

Hej er igang med at lave et program hvor man skriver i
2 txt. som laves til en txt fil og ligges i mappen programmet blev startet fra.
jeg vil bare gerne havde at den kan sendes til en mail
med txt filen, helst gmail. vis det gør en forskel.

det her er koden indtil videre.
håber i kan fortælle mig hvordan jeg
for den til at sende txt fieln til en mail i stedet.

Private Sub Command1_Click()
Dim namefile
namefile = Text1
Open App.Path & ("/" + namefile + ".txt") For Output As #1
Write #1, Text1.Text
Write #1, Text2.Text
Close #1
MsgBox "Txt. file send to email eksempel@gmail.com", 190, "Program"
End Sub