.net设置重点文字的颜色为红色

各位:

      做了一个发送邮件的函数,想在邮件重点的地方,用红颜色标记.请问如何实现?VB.NET

 

 

 Public Function dsemail2(ByVal mail As String, ByVal file_no As String, ByVal file_name As String, ByVal file_session As String, ByVal file_path As String) As Integer
        Dim subjectstr, demostr As String
        subjectstr = file_name + "文件新发布"//此处为红色
        demostr = "您好！" & Environment.NewLine
        demostr = demostr & "新文件发布通知，请勿回复！" & Environment.NewLine"//此处为红色

        demostr = demostr & "今天新上传了文件,请您查阅!" & Environment.NewLine
        demostr = demostr & Environment.NewLine & "文件编号:" + file_no
        demostr = demostr & Environment.NewLine & "文件名称 :" + file_name
        demostr = demostr & Environment.NewLine & "文件版本号:" + file_session
        demostr = demostr & Environment.NewLine & "文件路径:" + file_path
        demostr = demostr & Environment.NewLine & "以上" & Environment.NewLine
        demostr = demostr & "　　希望您能抽时间查看！""//此处为红色

        '---------------------------------------------------------将员工编号和姓名分开
        Dim message As MailMessage = New MailMessage(stremail.ToString, mail, subjectstr, demostr) 'toemail
        Dim client As SmtpClient = New SmtpClient(strsmtp.ToString)
        client.UseDefaultCredentials = False
        client.Credentials = New System.Net.NetworkCredential(stremailuser.ToString, stremailpassword.ToString)
        client.DeliveryMethod = SmtpDeliveryMethod.Network
        client.Send(message)
        Return 1

    End Function