Enviar Correo en VB.NET

[chcma]

Ufff, no tiene años ni nada el post, jejejeje
Espero te sirva

Código:

        Dim smtpCliente As New System.Net.Mail.SmtpClient("servidorCorreo", 25)
        Dim objCorreo As New System.Net.Mail.MailMessage("DE", "PARA", "ASUNTO", "CONTENIDO")
        smtpCliente.Send(objCorreo)

Y si quieres menterle usuario, antes de el SEND():

Código:

smtpCliente.Credentials = New System.Net.NetworkCredential("USUARIO", "CLAVE")