Email vb.net

Bonjour,

je suis entrain de devlopper une application qui permet d'envoyer des emails en vb.net

j'ai programmé ce code mais malheureusement il m'envoi un message d'erreur
La chaîne spécifiée n'est pas de la forme requise pour une adresse de messagerie. :::::::::

Imports System.Net.Mail
Public Class message
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim emailmsg As New MailMessage
Try
emailmsg.From = New MailAddress("*****@hotmail.com")
emailmsg.To.Add("******@hotmail.fr")
emailmsg.Subject = TextBox3.Text
emailmsg.Body = TextBox4.Text
Dim smtp As New SmtpClient("smtp.hotmail.com")
smtp.Port = 25
smtp.EnableSsl = True
smtp.Credentials = New System.Net.NetworkCredential("******@hotmail.com", "**********")
smtp.Send(emailmsg)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub