Vb.net ile HTML formatında mail atmak

Merhaba 

System.Net.Mail namespace ini kullan.

dim m_frm, m_to as string

m_frm = "[email protected]"
m_to = "[email protected]"

  Dim mymail As New MailMessage(m_frm, m_to)
        Dim SendCC As MailAddress = New MailAddress(txt_cc.Text)
        mymail.CC.Add(SendCC)
        mymail.Subject = txt_baslik.Text
        mymail.Body = txt_body.Text ' html maili buraya yaz
        mymail.Priority = MailPriority.High
        mymail.IsBodyHtml = True
        Dim smtp As New SmtpClient
        smtp.Host = "ip_adres"
        smtp.Port = "25"
        smtp.Send(mymail)

Teşekkürler.